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DES POINTS 


06000 
06210 
08600 
10000 
11000 
11000 
12000 
13004 
13005 
13006 
13200 
14000 
16000 
18000 
19100 
19100 
21000 
24100 


25206 
26000 
26500 
29000 
30000 
31000 
33000 
33800 
34006 
34200 
34500 
37170 
38500 
39000 


41500 
42000 
42100 


42300 
44100 
45000 
47000 
49000 
49300 


54000 - 


56000 
56100 
57504 
57800 
59000 
59000 
59400 
59500 
59800 
60108 
60200 
63000 
64110 
64600 
66000 
67150 
68000 
69003 
69400 


70000 


71100 
71400 
72000 
73100 
74102 
75001 
75005 
75006 
75008 
75009 
75009 
75009 
75010 
75010 
75011 
75011 
75012 
75014 
75015 
75015 
75016 
75016 
76600 
76600 
76600 


77000 - 


80000 
83000 
86011 
87000 
89100 
89100 
91210 
92100 
92100 


94100 - 


98000 
88002 


LISTE 
DE VENTE 


- MAD'S - NICE - (93) 88.04.79 
- ÉVOLUTION 2000 - MANDELIEU - (93) 49.81.61 
- MICRO-BOUTIQUE JCR - GIVET - (24) 55.01.93 
- MICROPOLIS - TROYES - (25) 72.03.79 
- I ÉLEC VIDEO CLUB - CARCASSONNE - (68) 47.08.94 
- R 2 | INFORMATIQUE - NARBONNE - (68) 65.15.83 
- BASE 2 SOCODETI - RODEZ - (65) 42.50.05 
- ALLIANCE - MARSEILLE - (91) 86.35.99 
- ELP INFO - MARSEILLE - (91) 94.91.13 
- MD SYSTÈME - JCR BOUTIQUE - MARSEILLE - (91) 37.62.33 
- LUDO - ARLES - (90) 96.79.03 
- OMB-VASSARD TILLIETTE - CAEN - (31) 93.48.09 
- SA. LHOMME - ANGOULÈME - (45) 99.97.37 
- AVENIR INFORMATIQUE - BOURGES (48) 65.16.57 
- MICROMATIC - BRIVE - (55) 87.15.17 
- INFORMATIC 19 - BRIVE - (55) 87 77.08 
- O.M.G. MICRO LEADER - DIJON - (80) 30.12.70 + 
- MICRO CYRANO INFORMATIQUE - BERGERAC - 
(16) 56.06.06.12 + 
- ITA MONTBELIARD - MONTBELLIARD CEDEX - (81) 94.50.65 
- DOMICA - VALENCE - (75) 41.14.75 
- ECA ÉLECTRONIQUE - BOURG-LES-VALENCE - (75) 42.68.88 
- L'ORDINATEUR 29 - QUIMPER - (98) 95.92.70 
- DISCOUNT INFORM. SERVICE - NIMES - (66) 23.74.91 
- MICRO DIFFUSION - TOULOUSE - (61) 22.81.17 
- MICRO DIFFUSION - BORDEAUX - (56) 81.11.99 
- ETS COCA - BORDEAUX - (61) 92.91.78 
- PIB - JCR BOUTIQUE - MONTPELLIER - (67) 58.84.37 
- BUREAU ORGANISATION - SÈTE - (67) 74.34.10 
- MARCELLEC - BÉZIERS - (67) 31.37.65 
- LIM - CHAMBRAY-LES-TOURS - (47) 27.29.00 
- MICRO AVENIR - VOIRON - (76) 65.72.55 
- MIÇRO 39 - JEAN-PIERRE-ANDRÉ - LONS:LE-SAUNIER 
(84) 24.45.39 
- TIM. - MER - (54) 81.62.47 
- DÉTROIT INFORMATIQUE - SAINT-ÉTIENNE - (77) 33.58.59 
- SAINT-ÉTIENNE COMPOSANTS - SAINT-ÉTIENNE 
(77) 33.50.14 
- MICRO SYSTÈME RHONE-ALPES - ROANNE - (77) 68.67.99 + 
- SILICONE VALLÉE - NANTES - (40) 73.21.67 
- TÉLÉPHONIE BIS - ORLÉANS - (38) 54.34.34 
- JULIEN ÉLECTRONIQUE - AGEN - (58) 66.55.64 
- TEMPS X - ANGERS - (41) 88.95.07 
- CHOLET INFORMATIQUE - CHOLET - (41) 46.02.40 
SÉREC - NANCY - (8) 339.12.60 
- L'ORDINATEUR 56 - VANNES - (97) 49.59.90 
- L'ORDINATEUR 56 - LORIENT - (97) 64.52.54 
- ARGO INFORMATIQUE - SAINT-AVOLD - (87) 99.54.84 + 
- CMI - FREYMING MERLEBACH - (87) 81.14.89 
- ETS BOULANGER - LILLE - (20) 54.98.75 
- BÉCY INFORMATIQUE - LILLE - (20) 92.33.06 
+ MICROSHOP - CAMBRAI - (27) 81.98.09 + 
- CID - DOUAI - (27) 88.47.20 
- M.8.D.C. - LILLE - (20) 57.91.87 
- QUENEUTTE - CREIL - (4) 495.04.26 
- LARDET S.A. - COMPIÈGNE - (4) 423.07.86 
- IMPACT - CLERMONT-FERRAND - (73) 92.17.55 
- ESPACE MICRO 64 - BAYONNE - (59) 59.41.55 
- INFORMATIQUE BASCO LANDAISE - ANGLET - (59) 31.96.05 
- SÉRIE INFORMATIQUE - PERPIGNAN - (68) 34.00.11 
- ETS A FRITSCH - ERSTEIN - (88) 98.03.51 
- EI.B. - COLMAR (89) 23.68.35 
- BILMP. - LYON (7) 860.84.27 
- MICRO INFORM BEAUJOLAISE - VILLEFRANCHE-S/SAONE - 
ACERUES 
LECTRO BOUTIQUE - VESOUL - (84) 76.49.59 + 
- AVENIR ÉLECTRONIQUE - CHALON/SAONE - (85) 48.73.35 
- CH.B. ÉLECTRONIQUE - AUTUN - (85) 59.70.26 
- MICROTIQUE AESCULAPPLE - LE MANS - (43) 24.97.80 
- L'ORDINATEUR - AIX-LES-BAINS - (79) 88.19.07 
- D.S.A. MICRO - ANNEMASSE - (50) 38.31.40 
- MDEO SHOP - PARIS - (1) 296.93.95 
- HACHETTE - PARIS - 633.84.68 
DURIEZ S.A. - PARIS - 399.05.60 
- ÉNERGY 8 - PARIS - 293.41.33 
- LE JEU ÉLECTRONIQUE - PARIS - 596.69.93 / 874.43.20 
- LPS BUREAU - PARIS - 878.96 45. 
- J.CR ÉLECTRONIQUE - PARIS - 289.19.80 
+ GÉNÉRAL MDEO - PARIS - 206.50.50 
- LOGIC STORE - PARIS - 206.72.98 
- COCONUT INFORMATIQUE - PARIS - 355.63.00 
- P.LT.8. - PARIS - 254.38.01 
- ELLIX - PARIS - 307.65.58 
- MIDEF - PARIS - 539.98.,68 
- J.C.S. COMPOSANTS - PARIS - 355.96.29 
- ILLEL CENTRE - PARIS - 554.97.48 
- PENTASONIC - PARIS - 524,93.16 
- ANTIGONE - PARIS - 743,13.41 
- MICRO MAX - LE HAVRE - (35) 41.77.47 
+ V.P.C. BUREAU - LE HAVRE - (35) 49.49.91 
+ L'ORDINATEUR - LE HAVRE - (35) 21.54.55 
EPSILON - MELUN - 437.51,95 
- LOGIC - AMIENS - (29) 95.54.84 
- P.S.I. ÉLECTRONIQUE - TOULON - (94) 93.11.20 
- LISTE INFORMATIQUE - POITIERS CEDEX - (49) 41.43.86 
- MICROLIM - LIMOGES - (55) 34.10.19 + 
- MINI LOISIRS - SENS - (86) 64.41.91 
- LASOBIKOR YONNE - SENS (86) 64.51.96 + 


- MDEOTRONIC - DRAVEIL - 940.28.30 | 
- AXIOME - BOULOGNE - 604.02.21 
- OLIG - BOULOGNE BILL. - (1) 605.05.59 


DIXMA - SAINT-MAUR - 885.98.22 
- MICROTEK 2 - MONACO - (93) 30.67.67 + 
- AV.M. - ÉPINAL (99) 89.14.97 


TT ee À: 
OBLIGE 


Le deuxième d’une 
longue série de guide 
des logiciels. 

Plus d’un tiers de nou- 
veautés. 


PAUET 07 NT 2 


— Une sélection de 416 
programmes en Anglais 
ou en Français pour : 

Ad EN ee)" ee) 13 

V90 et C64 - EPSON HX 920 - 

ORIC 1 et ORIC ATMOS - IBM PC 

- SINCLAIR ZX81 et SPECTRUM YA 

TRS 80 - THOMSON TO 7 - 

a 1@10);2 

— Les fiches techniques de æ 
chaque programme compre- 
LE Lui 

La description précise du pro- 

gramme. 

Son prix moyen constaté. 

Sa compatibilité avec tel ou tel 

[tallet fo} 

— En plus vous trouverez : 

Des conseils pour choisir et acheter 

le programme que vous cherchez. 

Des index pour trouver facilement 

ce que vous cherchez. 


æ 


DAUDURESR, 7410), 


DISTRIBUTEUR OÙ 15F+5F = |! 
DE PORT EN RENVOYANT LE g 
COUPON CI-DESSOUS. 

LA HAUTE FIABILITÉ 


BON DE COMMANDE A RENVOYER A SPID - 39, RUE V.-MASSÉ - 75009 PARIS 


Je désire recevoir le “GUIDE DES LOGICIELS” Printemps 1984 
Je joins 20 F en chèque (15 F+ 5 F de port) en règlement. 


NOM rs anus ue rien eee en rente enter TRUE CN SRE 








De Profondis ! Vous avez en main le dernier numéro de La Commode. Raison de plus 
pour le lire avec attention. Mais La Commode ne disparaît pas complètement. En fait, 
elle éclate en trois revues consacrées chacune à une marque : Commodore, Atari et 
Oric. La revue consacrée aux Commodore s'appelle 64 Magazine. Son premier numéro 
paraîtra à la date où serait paru le n° 12 de La Commode, donc pour le SICOB. Nous 
nous excusons de demander un peu de patience à nos amis Ataristes et Oriciens : leurs 
revues sont à l'étude mais il nous est impossible d’en lancer trois simultanément. 


Daniel-Jean DAVID 


N.B. : Nos abonnés recevront personnellement une circulaire léur donnant toutes informations sur leur cas. 








SEDERMI (société éditrice de La Commode) pré- 
sente un ensemble de cartes d'extensions pour le VIC, 
caractérisées par un rapport qualité/prix sans concur- 
rence. En préparation, systèmes de cartes pour 64 et 
ORIC. 

Ce sont : 

a — Les cartes EXTVIC-BUS 4/EXT64-BUS 4 

qui permettent de connecter simultanément 4 cartou- 
ches ou extensions à votre VIC/64, par exemple VIC- 
MON, PROGRAMMER'S AID, SUPER EXPANDER et 
une extension mémoire, ou toute autre combinaison. 
La carte EXTVIC-BUS 4 existe en 8 options : 

— N La carte montée et testée, avec alimentation par le 
VIC ; c'est l'option normale. 

— E Comme N, mais alimentation extérieure (non four- 
nie). Cette option est utile pour certaines extensions 
d'entrées-sorties et applications particulières. 

— $ Permettant, grâce à 4 interrupteurs d'activer la car- 
touche voulue et ainsi d'avoir 4 cartouches de jeu ou 
Super Expander montées en permanence. 

La carte EXT64-BUS 4 n'existe qu'en options. 

b) Les cartes EXT...-VIA/PIA 2 (pour VIC, 64, ORIC) 
qui procurent 40 lignes d'entrées-sorties supplémentai- 


res (idéal pour commander des appareils domestiques, 
des trains électriques etc.). 

Chaque carte contient deux PIA 6821 ou VIA 6522 
(qui procurent en plus 4 temporisateurs programma- 
bles). Il y a 4 adresses de base au choix (à préciser à la 


commande). On peut connecter simultanément 4 cartes 


analogues à un VIC ou à un 64, 2 à un ORIC. 

c — La carte EXTVIC-EPROM 4 

qui contient 4 supports d'EPROM 2532, ce qui vous per- 
met d'avoir vos programmes permanents figés en 
EPROM et disponibles dès la mise sous tension. 
Chaque EPROM peut être activée ou inhibée par inter- 
rupteur et être implantée au choix en 4 adresses. 

d — L'interface ORIC-JOY 1 qui permet de connecter 
un manche à balais Commodore, Atari ou compatible à 
votre ORIC pour 70 F. 

e — L'interface magnéto qui permet de connecter un 
magnéto ordinaire à votre Commodore. La version À 
ne commande pas le moteur, la version B (recomman- 
dée pour le 64) le commande. 

En préparation, cartes relais, programmateur 
d'EPROM, etc. 


Ë BON DE COMMANDE 
à adresser avec le règlement à SEDERMI, 28, rue Vicq d'Azir, 75010 Paris 
(délai à prévoir : un mois environ) ° 
NOT: 0 Rd ra eue € 02e a ru a na eo OI rt L'RUNTE 8 
ATOS | RE D data tan minis im date ds ua e 0 Et Ce ne Le ce al. <a MS 

… ORIC JOY1 (70 F TTC) : ETTC 

.… EXT64-BUS4-S (480 F TTC) : 

…. EXTVIC-BUS4-S (480 F TTC : règlement par 
de EXTVIC-BUS4-N (390 F TTC): CCP :0 
ne EXTVIC-BUS4-E (390 F TTC) : CB:0 
Fe EXTVIC-PIA2 (690 F TTC) : mandat : ( 
De EXTVIC-VIA2 (730 F TTC) : 

AE EXT64-PIA2 (690 F TTC) : 

Ne EXT64-VIA2 (730 F TTC) : 
cu EXTORIC-PIA2 (690 F TTC) : 

55 EXTORIC-VIA2 (730 F TTC) : 
TS EXTVIC-EPROMA4 (310 F TTC): 
des INT-MAGNETO A (120 F TTC) : 
en INT-MAGNETO B (ZOFPTTC): - e 
TOTAL ARRETE FTTC . 
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BAOHALS.:.: 7 LES LT TR RS 
Bonunaire ..... 24 re on 
Courrier des lecteurs .......... 6 
La pendule magique ........... 17 
11) ASRANRNENRE MEET tee ao a 


Pour avoir sur imprimante le cata- 
noue d une dise ORIC. 21 





“+ pe 20 
eau dés nee A 26 
Défilement latéral :: 2: ..:::.....27 
RÉ ENTER CS" 20 





Magnéto ordinaire ............. 38 
PS. brac ..:. NP Le. 5:00 
Fe de saisie SUr ORIC ,.., 42 





. 46 

. 48 
(et aussi 64) . LU «0 
 -curder une cassette 
sooeque, ORIC:.:.... 4% 24,51 


CBM «VIC 
# ke 
% fr 
# k 
k % 

de 
ke 
k de 
* 
# k 


Z Annals n° 


* tt * + 


x 















Caractères accentués 
LU À 9 1 (Ce SORTE ETES ET 52 


Des listes plus lisibles ....... 45400 
Contrôle des DATA .........:... 54 
APFEND pour DIR ee à sus di du OÙ 
rauvelade ous: Gr MELON 58 
Répétition automatique ......... 59 


Utilisation de deux magnétos 
à à PP EE PU LEE 60 


Quelques trucs pour 
CBNESOUO. GORE se à sauts t uet « 64 


CRIE DAC Cr ON se, 66 


Copie haute résolution 
de ÉTAT AO ne dus à 67 


Display List et 
d'affichage de TATARI . LPERTT 74 
Facteurs premiers ............. 81 


Haute résolution purement 
IOOIGÉLÉ "EUX CEM' 87 


Un programme d'inversion 


Bibliographie 1,70, st 2, 
Communiqués de Presse Lun. 





CBM VIC 





* 


* * * 


64 ATARI ORIC 


[ commooore 64*  Cjvrc 20**X [Clonrc O arPLe 
Disquette (en option) 30F en sus. 


* * * * 











5 M.M.C.I "LA COMMODE", 28 rue Vicq-d'Azir 75010 PARIS 
Je désire recevoir un "GRAPHISCOP" au prix de 990F TTC.(offre valable 

que pour cette publicité)]*35F(port et emballage),comprenant l'appareil, 

le logiciel, le manuel utilisateur et la garantie du constructeur pour: 


OlaPPLE 11e 


X Utiliseble avec TOOL 


XX Utilisable avec SUPER-EXPENDER 


NOM ts en PRENOM 

AO osnanenentinnanentommntiiihann 2 CR res 
Je règle la somme de 

! par O chèque bancaire O chèque postal 


PE orne ie A 


F à l'ordre de M.M.C.internetional 


mandeat-poste 


ÿ 








1 / Je possède 8 mémoires statiques 
8116. Peut-on Les placer à La place 
des 4116 disponibles ? 


2 / A quoi sent L'adresse PEEK 
(50003) que je netrouve aux des 
programmes divers (de PET) 


Je voudrais aussi que vous me 
communiquiez L'adresse de votre 


boutique. 


Je félicite L'équipe pour sa 
compétence. Je considère que votre 
nevue est une grande source d'astu- 
ces et une source de développement 
sûre et intéressante. 


Laurent HADUAU 
94300 VINCENNES 


1 / Nous ne connaissons pas La mé- 
moire 8116. IL est possible qu'elle 
soit compatible avec La 4116 maïs, 
à ce moment, elle ne serait pas 
statique. Donc, prudence. 

2 / L'adresse 50003 contient 0 sur 
PET, 1 sur CBM 3000, 160 en BASIC 
4, elle sert à discriminer Le modè- 
Le depuis un programme. 


3 / Nous n'avons pas de boutique. 
LA COMMODE est en vente chez Les 
distributeurs PSI ou par corres- 
pondance. 





Je souhaiterais savoir comment 
a L'aide d'un POKE supprimer £e 
cwueur tout en pouvant continuer à 
écrire. 


Pourriez-vous pub£ier une {a- 
ble complète d'adnessage pour Le 
VIC (et pour d'autres CBM). 


Antette et Lucien DIETRICH 
67000 STRASBOURG 


Ce n'est pas un POKE qui empê- 


che Le curseur Lors d'INPUT. IL 


faut faire Les entrées par GET (et 
alors un POKE 204,0 fait clignoter 
Le curseur) 





J'ai trouvé moi-même La répon- 
se à ma question sur La déformation 
de L'affichage du téléviseun.Elle 
n'est pas inhérente au codage, mais 
à La fréquence du quartz du VIC 20. 
En csgez, Ài£ suffit de netoucher 
Le néglage de ce que je suppose 
être une self pour voir disparat- 
tre Le phénomène (probablement une 
diféérence entre La fréquence de 
rafraîchissement du VIC et £a fré- 
quence interne balayage-Lignes du 
téléviseur. 


M. Alain NOURY 
91300 MASSY 





Possesseur d'un CBM 3032 asso- 
cié à une imprimante 4022 et à une 
unité double disque 4040, À£ m'ax- 
rive d'avoir des ennuts avec cette 
dernière. 

Je m'empresse de dire que ce 
n'est pas La nègle générale, mais 
il arrive que, sun un disque conte- 
nant des programmes, À£ ne soit pas 
possible de retrouver ceux-ci. 
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Ceci apparaît au moment où on 
étend un fichier (programme ou 46- 
quentiel) d'une quantité assez 
grande de données, alors même que 
Le disque n'est pas nemp£i à moi- 
dié. En somme, 4£ semble qu'il y 
ait chevauchement des données sur 
Le disque. 


Pouvez-vous me dire s'il est 
possible que je me Livre à une 
fausse manoeuvre à un moment donné, 
ou 4'4£ y a des précautions spécia- 
Les à prendre dans ce cas ? 


_ De plus, Le répertoire affiche 
{oujours Les progones devenus im- 
possibles à charger... 


Je vous remercie d'avance des 
conseils que vous pourriez me don- 
ner à ce sujet, et vous félicite 
pour £a tenue de votre nevue dont 
fe suis un fidèle abonné. 


Marcel DURVAUX 
B 6110 MONTIGNY-LE-TILLEUL 


Le système disque gère Les 
données sous forme de Liste chaînée 
et il lui arrive de s'emmêler Les 
pédales dans Les chaînages. Nous 
n'y connaissons pas de remède sauf: 


- éviter Les disques trop pleins, 

- éviter Les scratch et Les save 
avec remplacement (@) - 

- éviter Les rename. 





: Je me permets de vous félici- 
ter pour votre n°5. Quel progrès 
et quelle qualité (= utilité) des 
programmes et idées ! Je crois que 
vous aœvuivez {rès vite à quelque 
chose d'essentiel. À quand une pa- 
nution plus fréquente ? 


Je vous propose 
idées : 
1 - Mettre Le feedback derrière une 
page de publicité et non d'ar- 
Licles; ça va, cette {os , L'anti- 
c£e n'était pas pour "mon" ondina- 
Leur, mails je sauts 4Ûr que certains 
vont hésiter à couper une page de 
valeur ! 


quelques 


2 - S'iL vous plait !!11 Editez une 
table de correspondance entre Les 
zones mémoires CBM - PET -- VIC, 
CBM - PET c'est presque comp£et, 
mais VIC neste derrière avec des 
programmes inadaptab£es . 


À ce propos, fe peux Vous pro- 
poser La gestion de fichier pour 
VIC "avec un tri des VATA", Si ça 
vous intéresse. Ve toutes façons, 
Les conversions de POKE sont ici 
très simples : 


POKE VIC VIC 
WAIT 158 = T98; WAIT 152 = 653 


POKE 623 = 631; POKE 624 = 632 
POKE 826 = 1 (par exemple). 


Mais quelle envie me neste-t- 
i& de pouvoir adapter Les program- 
mes donnant de nouvelles instruc- 
tions ! 


3 - Pouvez-vous créer une rubri- 
que "Boîte à questions" où Les £ec- 
Leurs vous enverraient Leurs pro- 
b£èmes. Ceux-ci pourraient Etre néè- 
pondus par vous ou par d'autres 
Lecteurs dans Les numéros suivants. 


Pour vous aider à commence, 
voici celles que j'ai : 


a ) Comment peut-on écrire de 
droite à gauche de L'écran de façon 
napide. (J'ai un programme mais en 
BASIC on ne va pas vite). Ceci est 
indispensable pour L'écriture dans 
centaines Langues. Ÿ aurait-il un 
POKE par Là-bas derrière qui ferait 
£e travail vite et bien ? 


b ) Comment peut-on "diriger" 
de £a mémoire en cartouche vers 
centaines adresses 7? 

Ex. : £a cartouche 16K met 
tout en bloc. Je auis intéressé 
d'en mettre en $A000 (et oui ! VIC 
REVEALED donne une bonne Liste 
d'instructions nouvelles à placer à 
cette adresse). Mais comment :4an4 
fer à souder" pourrait-on néaliser 
cet exploit ? 


c) Peut-on redéfinir Les ca- 
nactènes en 5x7 (au Lieu de 8x8) et 
néutilisen Les "morceaux d'octets 
vides" pour obtenir plus de carac- 
4ènes par Ligne ? 
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d )} L'émprimante VIC a-t-elle, 
oui ou non, Les accents ? Les ver- 
sions semblent diverger. Peut-on, 
oui ou non, avoir en sortie imprit- 
mante un texte accentuëê, 44 ainsi 
ont été nedéginis Les caractères 
dans Le générateur en RAM ? - 


e ) Les prix vont-ils baisser 
substantiellement avec La sontie du 
VIC 64 ? Les éléments communs (ac- 
cessoinres) vont-ils aussi baïssen ? 


Bon, ma dernière question à 
propos de L'EXTENSION EXTVIC-BUS 4 
Je suis très, très intéressé, mais 
n'y connaissant nien en électro- 
nique, quelle est La différence (et 
L'utilité) entre BUS4-N et BUS4-E . 
ÿ a-t-il avantage à avoir une alt- 
mentation extérieure (et 44 oui, 
quelle doit-elle être et où 4e La 
procurer) ? Quel avantage ou danger 
avec L'alimentation directe sur Le 
VIC ? Et, enfin, à part Le chassis 
et Le prix, quelle est La différen- 
ce entre votre extension et celle 
de COMMODORE ? J'attends vivement 
vos conseils pour pouvoir me déci- 
der et (engin!) pouvoir utiliser 
mes diverses extensions simuêta- 
nêment ! Ecrivez vite #'4££ vous 
plait ! : 

Voila, j'espère de tout coeur 
que ces idées pourront collaborer à 
faire une nevue toujours supérteu- 
ne. 


Francis ESTEVE 
38290 VILLEFONTAINE 


1 - Suggestion retenue (cf n°5) 


dHEACT - n°6 ,page 35. Votre 
programme de GESTION DE FICHIER 
nous intéresse. 


3 - Bonne suggestion aussi mais La 
périodicité de trois mois ne faci- 
lite pas. 


a — à part POKE dans La mémoi- 
re d'écran ou Le langage machine, 
il n'y a rien. 


b — Les cartouches 8K ont des 
interrupteurs qui permettent de 
“diriger” Les adresses sans fer à 
souder (mais avec ouverture de La 





cartouche). Si Les 16K n'ont pas 
Les interrupteurs, il faut jouer du 
fer à souder. Si vous ne voulez pas 
ouvrir La cartouche, on peut jouer 
du fer à souder sur une carte EXT 
VIC BUS&. 


c — NON. La cassette qui four- 
nit 40 col. fait comme si elle tra- 
çait chaque caractère en tant que 
courbe haute résolution. 


d - L'imprimante VIC a Les ac- 
cents, à condition de Les program- 
mer comme caractères graphiques. 


e — Les prix ont effectivement 
baissé. 


& — La carte La plus normale est La 
N. La E ne sert que pour des appli- 
cations bien particulières d'en- 
trées-sorties. 





Je viens juste de necevoir mon 
VIC 20 et une extension 16K. Pan 
ailleurs, pour m'énitier au BASIC, 
j'ai Lu Le Livre de Daniet-Jean 
VAVID: "La découverte du VIC" et je 
me suis énténessé au graphisme hau- 
te nésolution. Mais Le programme de 
tracé de courbes de Daniel-Jean 
DAVID 4e limitant à un VIC de base 
(3,5K de mémoire), pourriez-vous 
m'indiquer un programme adapté à 
16K, qui me permettrait d'avoir Le 
maximum de points sur L'écran 
(176x184), ou tout-au-moins Les 
POKAGES" de La Ligne 10,20, Les 
valeurs de E,G, de CO, et La valeur 
maximale de N (c£. {est de La Ligne 
2000). (Le programme de tracé de 
courbes est à £a page 124-125 de 
“La découverte du VIC") 


Par ailleurs, pourriez-vous 
m'indiquer s'il existe une façon de 
redimensionner un {ab£eau dans un 
programme afin d'éviter Le message 
d'erreur : REDIM” D ARRAY. Si out, 
Laquelle ? 


Adam BURE 
76133 MANEGLISE 
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1 -— La conversion des programmes 
haute résolution pour VIC étendu a 
été traitée en détail dans LA COM- 
MODE n°8. Sinon, l'article du 
n°3,p. 31 devrait vous aider sa- 
chant qu'il faut envoyer Le début 
de BASIC en $2000 par POKE 8192,0: 
POKE 44,32 CLR (avant d'entrer 
votre programme). 


2 — Pour redimensionner un tableau, 
faire CLR avant, mais attention, 
cela supprime toutes Les variables. 





J'aimerais connaître Les moda- 
Lités de connexion (44 cette opéra- 
tion est néalisable) de votre carte 
EXT VIC - BUS4 pour plus de 4 car- 
touches : 

VIC MON 

PROGRAMMER ' AID 

SUPER EXPANDER + 3K 

SCREEN MASTER 

RAM & 
RAM 16 
soit Les 32 K RAM maximum. 


Est-il possible d'utiliser a- 
vec une alim. 5V extérieure deux de 
vos cartes EXT VIC - BUS4 en paral£- 
£Lèle pour obtenir 8 connexions ? 


Gilles BROCARD 
93250 VILLEMOMBLE 


On peut connecter une deuxième 
BUS4 sur La première ce qui permet 
7 extensions, mais même en alim. 
extérieure, attention à La fatigue 
du BUS. Dans Les connexions que 
vous proposez, SUPER EXPANDER et 
SCREEN MASTER sont incompatibles : 
il faut un modèle S dont Les inter- 
rupteurs permettent de désactiver 
L'une ou L'autre cartouche. 





J'aimerais avoir quelques ren- 
seignements je suis L'heureux 
possesseur d'un VIC 20 et d'une ex- 
tension 16 K . 


Dans Le cas d'un VIC version 
de base : 
- Par quels moyens, après avoir 
déplacé L'adresse du générateur de 
caractères en 5120, ce qui permet 
de nedéfinir 320 caractères pro- 
grammables, peut-on agficher sur 
L'écran ces 320 caractères, compte 
Lenu que £a valeur maximum autoni- 
sée dans un POKE est de 255 ? 


Vans Le cas d'un VIC et d'une 
extension 16K : 
- Quels sont Les moyens de faire de 
£a haute nésolution et de nedéginir 
un jeu de caractères programmables ? 


- Quelles valeurs doit-on mettre en 
36869 (registre adresse position de 
mémoire écran et position du géné- 
rnateur de caractères) ? 


Dans L'attente de votre 
néponse, sachez que je trouve votre 
nevue passionnante, bourrée d'astu- 
ces et de renseignements très inté- 
ressants . 


- Envisagez-vous une série 
d'articles sur Le Langage machine 
(initiation et perfectionnement) ? 


- Continuez comme cela, à nous don- 
ner quantités d'articles d'intérêt 
général comme "Qui a dit que BASIC 
n'était pas structuré ?", ou d'ar- 
ticles plus spécialisés même s'££s 
ne correspondent pas toujours à no- 
dre propre matériel, mais qui, mal- 
gré tout, sont toujours bénéfiques. 


Didier BENEY 
71130 GUEUGNON 


Vous ne pouvez pas avoir 320 
caractères programmables. IL faut 
se [Limiter à 255, c'est pourquoi 
pour La HR en mode statique, on 
passe à 16 lignes élémentaires par. 
maille (Cf. LA COMMODE n°5,p.36) 


Avec l'extension 16K, faire : 
G = 6144 : Po 36869,254 


et mettre Le début BASIC en $2000 
par 


Po 44,32 : Po 46,32 : Po 48,32 
s Po S0,52: CLR: 


Le, Caen ne 
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La série sur l'initiation au 

(o] 
L.M. à commencé au n 9. Nous pen- 
sons, comme vous, que, même pour un 
autre matériel, Les articles peu- 
vent être bénéfiques. Donc, Commo- 
doristes, Lisez Les articles sur 


ORIC et ATARI, et vice-versa. 





Très intéressé par votre nevue 
LA COMMODE et par Les Livres que 
vous avez édités sur Le VIC 20, je 
souhaiterais vous voir nèpondre aux 
questions suivantes : 


1 )] Avec une extension 16 Ko, je 
désire placer Le générateur de ca- 
nactères tout en bas des RAM . La 
méthode ext aïe avec Le VIC de 
base et Le générateur placé avant 
£a mémoire écran. Avec Le 16 Ko, 
comment opérer ? 


2 - Comment programmer Les touches 
fonctions 1 à 8 pour pouvoir Les 


utiliser pour La nédaction d'un 
programme ? [La repgnse prete à un 
Lecteur, dans £e.n” 6 de LA COM- 


MODE, indique que La népome 5e 
trouve dans £a nubrique "Vic à 
Brac", je n'ai rien trouvé dans £a 
page indiquée...) 


3 - Comment programmer AUTO-RUN 
avec Le VIC 20 ?: 


Etienne CIMETIERE 
14000 CAEN 


1 ) La technique La plus simple est 
de repousser Le début de BASIC au- 
dessus de $2000 par : 


POKE 8192,0 : POKE 44,32 : NEW 





2 ) Pour déceler Les touches de 


fonction faire  PEEK (203) et 
PEEK (653) : 
Iouche PEEK(203) PEEK(653) 

F1 39 0 

F2 39 1 

F3 47 0 

F4 47 1 

F5 55 0 

F6 55 1 

F7 63 0 

F8 63 1 


3 ) Rendre un programme AUTO-RUN a 
été traité dans Le n 9. 





Je n'ai qu'une vague idée de 
ce que Le VIC peut necevoir comme 
extensions : 


1 - Si je vous commande une carte 
EXTVIC - BUS4 peut-on mettre 2 car- 
touches de 16K, un SUPER EXPANVER 
et un PROGRAMMER'S AID [ce qui 
porterait La mémoire à : 

16 45h06 +822 35e 136, 58k rs, 


2 - Je souhaite trouver une 40£u- 
tion économique pour augmenter Le 
nombre de colonnes à L'écran (27 
Lignes sur 22 colonnes étant jus- 
te). Quel est Le meilleur moyen ? 


3 - Pouvez-vous me faire parvenir 
un {tarif et/ou un catalogue de 
tout ce qui est actuellement dispo- 
nib£e pour Le VIC 20, soit distri- 
buë par PROCEP, soit par Vos s0Ân4. 


J'ai êu avec intérêt £a plêu- 
part de vos anticles, mais mes fai- 
b£es connaissances de La program- 
mation ne me permettent pas de très 
bien assimiler cette nichesse de 
renseignements. J'aurais souhatté 
avoir plus d'explications sur Les 
points suivants : 


- La cassette UTIL VIC rnemplace-t- 
elle une cartouche déjà citée plus 
haut ? 

- Les cantes EXTVIC-BUS4 (£aquelle 
faut-il, La N ou £a E ?) 

- EXTVIC-VIAZ : À quoi sent-elle 


a A Comble n° 17 








exactement ? Personne n'a pu me di- 
ne quoi que ce soit (il est vrai 
que je ne connais pas grand monde). 
S'agit-il de L'extension de 40 £i- 
gnes à L'écran ? 


Quant à EXTVIC-EPROM4 c'est pour 
moi L'obscurité totale. 


Fernand BOUGON 
7614 PETIT-QUEVILLY 


1 - On peut mettre 2 cartouches 16K 
sur une EXTVIC-BUS4 mais elles au- 
ront des adresses en recouvrement 
et ne vous donneront que 24K. Ou 
alors il faut changer un jumper ou 
un interrupteur mais alors on prend 
La place de SUPER EXPANDER. 


2 - Cette question est reprise dans 
ce numéro. 


3. - Voyez La description de nos 
produits. SUPER EXPANDER et 
PROGRAMMER'S AID sont distribués 
par PROCEP, non par nous; 


4 — La cassette UTIL-VIC a certai- 
nes fonctions de PROGRAMMER'S AID 
et de SUPER EXPANDER, de façon sim- 
plifiée, mais bien moins chère. 
Elle ne Les remplace pas. L'EXTVIC- 
BUS4 qui suffit à presque toutes 
Les applications est La N . La E 
est pour Les bricoleurs; EXTVIC- 
VIA2 rajoute des entrées-sorties 
(Ex: pour un train électrique). Vo- 
yez une application dans ce numéro. 





LA COMMODE c'est encore mieux 
que ce que je pensais ! En effet, 
je m'attendais à n'avoir La réponse 
à mes questions sur £a 2031 que 
dans £e prochain numëro, c'est-ü- 
dire sans doute en juillet. Eh non, 
£a rédaction prend La peine de vous 
nédiger une réponse personnelle et 
manuscrite. Merci donc ! 


Si vous éditez une néponse 
concernant ma Lettre, indiquez aux 
novices comment entrer Les chiffres 
vouêus. Je butais, en effet, sur 
cette question; grâce à votre né- 


ponse, L'illumination est venue : 
i& faut entrer avec CHR$(X)=PAR EX. 
X=18 (decimal), donnera 12(hexa) 
sur La disquette. 

IL semble, par contre, impos- 
sible de conriger Le "BUG" de £a 
2031. L'octet en question connes- 
pond à 0; on, Le pointeur minimum 
est un. La meilleure solution pour 
utiliser Le programme VISPLAY 4e- 
nait sans doute d'äncrémenter £a 
piste demandée quand on a affaire à 
La piste 16. 


Pour L'EUEX, La notice est en 
accond avec votre néponse, mais 
L'inconvénient signalé est que 44 
vous Lancez un programme où figure 
£a commande "SYS46000" À£ n'est 
pêus possible de revenir au "dos". 
14 est donc souhaitable de nédiger 
et tester Les programmes sans n- 
troduire cette commande ni Les 
PRINT USING,etc.., pour pouvoir ma- 
nipuler sans souct. 


J'ai eu depuis ma Lettre une 
autre surprise avec Les disquettes 
: j'ai acheté sun Les conseils du 
vendeur de SDAI 32,avenue Garibaldi 
à Limoges, des MEMOREX, Le fin du 
fin ! Et chers ! Mal m'en a pris 
sur Les 5 disquettes : 2 donnent 
une fois sur deux READ ERROR 20, 
Les 3 autres nefjusent tout format- 
tage. J'ai demandé au vendeur de 
Les tester, son Lecteur [un GOUPIL) 
n'a pas non plus pu Les digérer. 
Quelques jours après, ce monsieur 
m'a dit que c'était son Lecteur qui 
était en cause. Curieux, n'est-ce- 
pas ? IL ne pouvait rien pour mot, 
même pas me donner L'adresse de £a 
maison MEMOREX !! Je n'ai pratique- 
ment pas eu de problèmes avec VER- 
BATIM ni 3; a-t-il une explica- 
tion (Ces squettes paraïtssent 
plus nigides que Les autres. J'ai 
acheté Les 5 disquettes au détail, 
peut-être est-ce un tont?). Quant à 
READ ERROR 20, j'aimerais en péné- 
ten Les mystères ? 


J.BOUTIQUE 
87000 LIMOGES 


LA COMMODE essaie de répondre 


directement aux questions pour évi-: 


ter d'attendre un trimestre, mais 
cela nous est de plus en plus dif- 
ficile. 
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Pour Les disquettes, dont ac- 
te. Que nos Lecteurs ne manquent 
pas de nous signaler Les résultats 
de leurs expérimentations, pour que 
cela profite à d'autres. 





Comme L'indique B. MICHEL dans 
Le Livre de BCM p.195, j'ai voulu 
tenter L'expérience de récupérer un 
fichier effacé. Mon matériel : CBM 
3008 monté à 32K, EVEX, FLOPPY 
2031. Cela a été L'occasion de 
quelques découvertes et interroga- 
Lions : 


1 - La piste 18 secteur 0 indique 
pour Les deux premiers octets 11 01 
(Décimal : 17 01). D'après Le manu- 
el de £a 2031, ce devrait être 12 
01 (La prochaine piste étant effec- 
Livement 18 01 en décimal). Cela 
entraîne des difficultés Lors de 
L'utilisation du programme DISPLAY 
T6S fourni sur La disquette de dé- 
monstration. On ne peut utiliser Le 
"Voulez-vous La prochaine piste & 
secteur" en ce qui concerne La pis- 
4e 18, L'erreur 4e reproduisant sur 
{ous Les secteurs. Est-ce La même 
chose pour toutes Les 2031 ? 


2 - Comment remplacer L'octet d'en- 
tête du fichier (00 puisqu'e{facé) 
par, par exemple, 82 (hexadécimat) 
qui signifie programme. J'ai tenté 
d'utiliser Le programme du volume 1 
de "La Pratique du PET/CBM" de D.J. 
VAVIU (Exercice 3-21). Cela semble 
convenir pour atteindre L'octet en 
question (piste 18 secteur 1 poin- 
Leur 3 par ex). Mais comment écrire 
82 (130 décimal) ? I£ faudrait sans 
doute un programme en Langage ma- 
chine. 


3 - Comment comprendre Le 
code des secteurs Libres piste 18 
secteur 0 pour Les 35 pistes c'est 
air, 4 octets par piste à partir 
du 5ème octet. Le premier octet in- 
dique Le nombre de secteurs Libres 
? L'utilisation bit par bit, 0 ou 
l, ne correspond pas à La néalité 
pour £e 2ème et Le 4ème octet ? 


4 -Quand je charge Le DOS et que 
j'exécute certains programmes (40u4 
EDEX semble-t-il) i£ est impossible 
de nevenir aux commandes du DOS 
(SYNTAX ERROR). Que se passe-t-il ? 


J'attends toujours avec impa- 
tience Le prochain numéro de LA 
COMMODE. C'est parfois un peu Long, 
mais Le netard est vite pardonné, 
car Les découvertes sont {toujours 
renouvelées. Je constate d'ailleurs 
en reprenant Les premiers numéros 
un certain progrès dans ma capacité 
de comprendre des difficultés qui 
me semblaient inaccesibles . Se- 
n£ez-VOus pédagogues, performance 
pour des spécialistes de L'ingonma- 
tique dont Le moins qu'on puisse 
dire, c'est qu'ils ne sont pas, en 
général, 4nrès soucieux de clarté 
dans Leur message vers Les person- 
nes.(En direction de Leur machine 
ça va sans doute mieux?) . 


Jacques BOUTIQUE 
87000 LIMOGES 


1 - IL semble qu'il y ait un bug 
dans La 2031. On peut probablement 
rétablir L'octet à 18 comme en 2- 


2 — Pour réécrire L'octet voulu, 
utiliser La commande U2 une fois 
que La bonne valeur a été mise dans 
Le secteur en mémoire. Pas besoin 
de langage machine (cf. ‘La Prati- 
que qu VIC"- VOL. T7, D...90, Qu "La 
Pratique du CBM" vol. 1, p. 75). 


3 - La représentation doit être 
exacte : 1 = libre, = occupé ou 
inexistant sur cette piste. On 


trouve, dans l'ordre, Les 3 octets 
76 54 32 10 15 14 13 12 11 1098 
et 23 22 21 20 19 18 17 16 |. Pour 
la piste 18 on a 11 10 11 00 11 


ATEUTV ART 00 00 01 11 soit ECFF 
07. 
& — EDEX prend Le contrôle de 


CHRGET de façon incompatible avec 
Le DOS. IL faut charger et Lancer 
DOS support avant de Lancer EDEX. 
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Après de nombreux tätonnements 
sur Le VIC, on s'aperçoit que £es 
espaces mémoire maximum disponibles 
sont Les suivants : 


de 4608(dec) à 32767(dec) :BASIC:28K 


de 1024(dec) à 4095(dec): 


machine : 3 K 


Langage 


et, ce dont on ne par£e que très. 


peu : 
de 40960(dec) à  49151{dec) 
Langage machine : 8K 


Nous avons donc un {otal disponible 
de 36K ! IL est vraïiment dommage 
que L'espace mémoire n'ait pas êté 
construit de façon à tout utiliser 
même en BASIC ! 


Tout ceci, pue £a façon 
de commuter Les &8K aux diffé- 
rentes adresses grâce à Leurs £n- 
terrupteurs internes (étudiés poux) 
n'est expliqué nu£le part, et aucu- 
ne publication ne donne des indica- 


:. dions exactes. 


Ve La même façon, Les incompa- 
tibilités entre Les différentes 
cassettes (RAM, SUPER EXPANDER, 
PROGRAMMER'S AID) ne sont que dès 
rapidement évoquées. 


Ceci dit, Lors d'un récent vo- 
yage à Paris, j'ai essayé de me do- 
cumenter sur Les nouveautés sur Le 
VIC. Quelle pauvreté ! Quand on At 
cé qui 4e passe chez nos voisins 
anglais ou allemands, on peut 4e 
poser des questions sur Les compé- 
tences de PROCEP, qui, sous L'excu- 
se de "francisation" (de quoi? des 
modes d'emploi ?) commercialise du 
matériel avec des mois de netard; 
que dire aussi de tous Les maté- 
rniels adaptables, {184 peu présents 
en France ? 


Prenons un exemple sur La 
place de Paris, au début mars, 
rares étaient Les distributeurs qui 
avaient plus d'une ou deux 
cassettes COMMOUORE (que ce soit 
RAM ou jeux). Vans ces conditions, 


L'acheteur éventuel ira certaine- 
ment vers d'autres matériels. 


J'apprécie beaucoup votre ne- 
vue, qui m'a tiré plus d'une épine 
du pied et m'a permis de mieux ex- 
ploiter mon matèriel dont je suis 
três content, par ai££eurs. 


Michel PILOT 
TEMARA (Maroc) 


Vos remarques sont justifiées: 
il n'y a, au maximum, que 27K pour 
BASIC. Les 3K ne sont utilisables 
que par POKE ou en LM. Les 8K de 
$A000 à S$BFFF sont Le plus souvent 
utilisés pour des extensions ROM 
(ex. SUPER EXPANDER). quand on ar- 
rive à se Les procurer. On explique 
dans Le n° 8 comment commuter Les 
cartouches de RAM. Nous approuvons 
votre remarque sur La pauvreté de 
ce qu'on peut se procurer pour Le 
VIC. Mais c'est surtout un problème 
de distributeurs qui ne font pas 
l'effort de se tenir au courant de 
ce qui existe et de suivre Leurs 
approvisionnements; beaucoup n'ont 
même pas LA COMMODE ! 





Je constate que je ne AUÂA pas 
seul à attendre du matériel Commo- 
done. Vepuis février, j'attends 
pour. mon VIC: £e magnèto, Program- 
mers' aid, Super Expander. 


Votre nevue est très bien fai- 
4e, et pour ce qui est du retard, 
bah!! c'est bien peu de chose: 4£ 
suffit d'avoir un ordinateur Commo- 
done pour savoir ce que c'est L'at- 
tente... on 4'en va vers des délais 
d'un an. 


P.S.: un petit reproche: c'est dom- 
nède d'être obligé de découper "La 
Commode" pour commander vos pro- 
duits; ne pourriez-vous pas faire 
une page à part pour Les bons de 
commande ? 


Roger BENARD 
10000 TROVES 
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Voici un lecteur qui prend Les 
choses du bon côté ! Ah si tous Les 
clients de Procep étaient comme ce- 
Las ils pourraient en faire encore 
moins ! 


Inutile de découper Les 


bons de Pise dans notre revue: 
vous pouvez écrire sur papier 
Libre. 





Bravo à La Commode pour £a 
qualité et La varnièté des articles. 
Ve plus vous critiquez sans com- 
platsance Les différents systèmes, 
{out en apportant des solutions, 
c'est ce que j'apprécie énormément. 


Par ailleurs, vous avez une 
4nès bonne idée de commencer un 
cours de Langage machine. Pos- 
sesseur d'un ORIC ATMOS, je suis 
évidemment {out particulièrement 
Ânténessé par Les articles Le 
concernant. 


Permettez moi de vous poser 
quelques questions : 


1) On £rouve dans toutes Les revues 
des programmes de copie d'écran 
Haute Résolution pour ORIC sur âm- 
primante Seikosha GP 100. Qui pour- 
nait me faire un programme de copie 
d'écran Haute Résolution Graphique 
pour L'imprimante Ornic 4 couleurs ? 
ou alors faut-il me nésigner à 
changer d'imprimante ? 


2) Comment faire avec L'ORIC ATMOS 
pour £racer en Haute Résolution des 
arcs de cernc£e de Longueur et cout- 
bures diverses ? 


3) À quand La suite de L'excellent 
Livre de Monsieur D.J. David " A £a 
découverte de L'ORIC" aux éditions 
PSI ? Livre qui permettrait L'ap- 
profondissement du BASIC et de 
£'ORIC ATMOS. 


4) La cassette TELECRAN pour ORIC 
ATMOS est elle disponible ? 


Pierre ANGELI 
83000 TOULON 


1) Un programme de recopie d'écran 
sur imprimante analyse l'image 
point par point et imprime Les 
points voulus. C'est très défavora- 
ble à La MCP40 qui fait plutôt des 
Lignes: il vaut mieux faire un tra- 
cé prévu au départ pour La MCP40. 


2) Il faut définir l'arc et faire 
Les tracés: 

FOR I= a TO b: X=XC+R*xSIN(I): 
Y=YC+YC+RxCOS(I): DRAW X,Y,..:NEXT 


.3) La "pratique de L'ORIC" est pré- 


vu pour bientôt. 


4) La cassette Télécran est dispo- 
nible, au délai de traitement de |a 
commande près. 





Je suis possesseur d'un ORIC VI.0 
depuis quelques mois et &£ 5e trou- 
ve que je viens de rar Connaks - 
sance des subtilités (ou problèmes) 
de £a bébête. 


1) IL existe plusieurs ondinateurs 
dont Le microprocesseur est un 
6502, mais Les possibilités sont 
digi{érentes de L'un à L'autre. Pan 
exemple sur certains À£ existe des 
Maprites", mais pas sur L'ORIC, 
pourquoi ? Pourquoi 
différences de possibilités ? 


2) Lorsque L'on désassemble La ROM 
V1.0 on trouve des fonctions basic 
telles que INVERSE, mais Lorsque 
L'on travaille en basic, 4£ ne 
connait pas cette fonction: que 
s'est-il passé ? 


3) Comment sont répartis Les digié- 
nents octets (48+16) ? 


4) Lorsque nous sommes en Haute Ré- 
solution pour dessiner un objet, ££ 
gaut obligatoirement Le cerner 
d'attributs de couleur papier pour 
que Les objets passant à proximité 
ne prennent pas sa couleur. De plus 
44 deux de ces objets voyagent en- 
semble L'attribut de L'un masque £a 
moitié de L'autre. 


, ae n° 


a-t-i£ des 


5) 1£ n'est pas possible de mé£lan- 
ger plusieurs couleurs, can nous 
sommes tributaires d'un affichage 
en matrice 6x6 pixels. Certains dt- 
sent qu'il serait possible d'agfi- 
cher pixel par pixel. Un Livre de- 
vrait sortir La-dessus. 


6) Peut-on remédier à La Lenteur de 
cakcul de L'ORIC ? 


/) Quelles sont Les différences va- 
Lab£es entre ROM VI1.0 et ROM Atmos? 


8). Je possède La cassette ORIC base 
mais je ne comprends rien aux {er- 
mes tels que £abe£, champs etc... 
et de ce fait fe suis bien incapa- 
ble de créer un fichier. 


9) Existe-t-il un compilateur ? 


10) À quoi correspondent Les deux 
néglages situés sous Le boîtier ? 
Que 4e passernait-il s' es étaient 
touchés ? 


11) Existe-t-il des Lecteurs de 
disquettes 5 pouces car on nous 
présente actuellement des Lecteurs 
3 pouces; La disquette 3 pouces est 
plus chère que £a 5 pouces. l'autre 
part qu'est-£ advenu de £a maison 
qui fabriquait Le Lecteur CYBORG ? 
Depuis qu'on a appris que cette 
maison devait commercialiser un 
Lecteur adaptabLe à {ous Les m- 
cos, on n'a plus entendu par£er 
d'elle. 


12) Peut-on réaliser de La synthèse 
d'image, ou digitaliser celle-ci, 
avec un magnétoscope, une camera 
vidéo et un ordinateur, sinon que 
peut-on faire avec tout cela ? 
Comment branche-t-on un ordinateur 
sur un magnétoscope sachant que £a 
sontie de L'ordinateur en UHF est 
en PAL. 


Patrick DELIAS 
45600 Sully sun Loire 


1) Les ‘’sprites" ne sont pas créés 
par Le 6502 mais par Le processeur 
graphique. Celui de L'ORIC n'en a 
pas. On peut cependant créer des 


effets analogues avec Les caractè- 


res créés par l'utilisateur, voir 
"La Découverte de L'ORIC'"' (PSI) 
pile, 


2) Les fonctions INVERSE et NORMAL 
n'ont en fait pas été mises. 

3) Voir La Commode n° 9 p.47. 

4) Ce que vous dites est vrai et 


résulte de La gestion des attri- 
buts. 


5) On peut changer de couleur pixel 
par pixel Le Long d'une verticale. 
Pour une horizontale, c'est par 
blocs de 6 pixels. Voir ‘'La Décou- 
verte de L'Oric'" p.129. 


6) On subit Les inconvénients d'un 
interpréteur Basic encore que celui 
de lL'Oric soit parmi Les plus rapi- 
des. Dans La Commode nl, il y a 
un article sur ‘accélérer vos pro- 
grammes Basic‘. 


4) Voir.-artaicle. .”Le. point:.usur 
L'ATMOS" dans notre n°10. 


8) Ces questions seront traitées 


dans Le Livre ‘La pratique de 
L'ORIC'" de D.J. DAVID aux éd. du 
PSI. 


9) Pas encore à notre connaissance. 


10) Ce sont des règlages fins pour 
La télé: L'image disparait s'ils 
sont déréglés. 


11) CYBORG a toujours ses disques 
en préparation mais Leur délai Leur 
ôte beaucoup de crédibilité. 


12) Le plus simple est d'avoir un 
magnétoscope PAL et de lui envoyer 
Le signal d'antenne de L'ORIC. Si- 
non, il faut prendre Les sorties 
RVB de L'ORIC et Les envoyer sur un 
codeur SECAM, ou alors avoir un ma- 
gnétoscope qui ait Les entrées RVB 
(peut être que l'entrée caméra Le 
permet). 
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Je viens d'acquérir un ATARI 
800XL et ne parviens pas à empêcher 
un nong£ement sur mon téléviseur 
portable couleur TELEAVIA. Le sex- 
vice après-vente du commerçant 
(SERAP-Levallois) a pris contact 
avec Le fabricant : sans solution 
pour L'instant... 


André BLAU 
93200 SAINT DENIS 


La connexion des ATARI par la 
prise d'antenne semble poser des 
problèmes. On Les évite probable- 
ment en se branchant par La prise 
Péritel. Voir Le schéma dans ce 
numéro. 





1) Dans Le n°8 p.28: Les ficelles 
de PEThalberg, comment arrêter et 
reprendre Le Listing d'un program- 


À envoyer accompagné du règlement à 


me. J'ai essayé sur 4016 en chan- 
geant INTNOR et VECT et ça 4e plan- 
4e. Pourriez-vous expliquer plus en 
détail ce programme, en particulier 
ce qui 4e passe en E810,E811 ? 


2) Sur ORIC, pour déplacer un des- 
sin j'ai besoin de deux octets 
consécutifs en page zéro pour L'a- 
dressage indirect. J'ai choisi "au 
pif" $50 et $51: plantage ! à quoi 
correspondent ces adresses ? 
Y-a-t-il des octets de disponibles 
en page zéro, quitte à Les sauve- 
garden ? 


Help ! help ! Qui peut m'aider ? 


Hubert RINALUI 
KENITRA (MAROC) 


1) Sur 4000, c'est La rangée 6 et 
non 8 qui intervient. D'autre part 
c'est INC $E812 d'où La fin du pro- 
gramme pour 4000: 


0347 A9 06 8D 10 E8 EE 12 E8 
034F DO F6 4C 55 E4 .... 


2) Les adresses 550, 51 sont utili- 
sées par L'ORIC. En revanche (voir 
l'article dans notre n° 10), Les 
11 premiers octets ($0 à $0B) sont 
utilisables. 


SEDERMI, 28, rue Vicq d'Azir, 75010 PARIS. 


NOM Scans hennh enable scvuvsenssssses sens. & 


Adresse : s.sssononsnsmsssseneesenensneemenesesesse 


Je désire Les logiciels suivants : 


nom machine 


(spécifier si compilé) 


(configuration) 


support 
(préciser Le type) 





L Chmade n° 11 








La plupart d'entre vous 
connaissent l'horloge interne des 
ordinateurs COMMODORE accessible 


depuis Le BASIC sur La variable 
TI$. Sa mise à l'heure est aisée et 
elle se met automatiquement sous Le 
format heure, minute, seconde. Ce- 


pendant, elle souffre d'un gros 
défaut : elle ne suppôrte pas Les 
échanges avec Les périphériques 


comme Les cassettes ou des disquet- 


tes. Lors d'un chargement ou d'une 
sauvegarde, sa valeur n'est plus 
mise à jour par Le système, plüs 


précisément par La routine d'inter- 
ruption qui l'incrémente régulière- 
ment d'un soixantième de seconde. 
Pour pallier cet inconvénient, Les 
concepteurs du €C 64 ont introduit 
une seconde horloge indépendante du 
BASIC et synchronisée sur Les cy- 
cles du secteur. Elle n'est plus 
accessible depuis Le BASIC mais son 
format DCB (décimal codé binaire) 
facilite grandement sa traduction. 
Cette pendule occupe quatre adres- 
ses mémoires consécutives débutant 
en 56328 et représentant respec- 
tivement Les dixièmes de seconde, 
secondes, minutes et heures. Nous 
allons décrire ces registres et 
ceux qui en dépendent : 


Adresse 56331 ($DC08) : Le bit 
4 représente La dizaine de l'heure 
0 ou 1, Les bits 0-3 Le chiffre des 
unités entre 0 et 9. Le bit 7 passe 
à 1 lorsque l'heure franchit 12:00 
(après-midi), elle repart alors à 
00: 00. 


Adresse 56330 ($DCOA) : pour 
Les minutes, Les bits 4-6 représen- 
tent les dizaines et Les bits 0-3 
Les unités. Le bit 7 est toujours 


nul. 

Adresse 56329 ($DC09) : 
identique à 56330 mais pour Les 
secondes. 


($SDCO8) : Les 


Adresse 56328 
bits 0-3 comptent Les dizièmes; Les 
bits 4-7 sont nuls. 


IL y a aussi d'autres adresses 
concernées. Tout d'abord comme La 
pendule est synchronisée sur La 
fréquence du secteur et que celui- 
ci oscille à 50 Hertz contre 60 aux 
ETATS-UNIS, il s'ensuit qu'elle de- 
vrait retarder (vérifiez Le, c'est 
une bonne gymnastique de l'esprit). 
Heureusement, Le cas a été prévu et 
Le bit 7 de l'adresse 56334 doit 
être mis à 1 pour Le 50 Hz et à 0 
pour Le 60 Hz. 


La pendule possède aussi une 
alarme ! Pour La modifier, La pro- 
cédure est identique au réglage de 
La pendule, mais Le bit 7 de l'a- 
dresse 56335 doit au préalable être 
mis à 1. On ne peut lire sa valeur 
et elle génère une interruption 
Lorsque qu'elle coincide avec La 
valeur de La pendule. 


Le programme ci-contre vous 
permettra de régler L'heure et de 
La voir affichée en permanence en 
haut à gauche de l'écran, On l'éli- 
mine par RUN/RESTORE et on La rap- 
pelle par SYS 49152. Ca programme 
comporte deux parties : L'une en 
langage machine à rentrer par un 
moniteur et l'autre en BASIC pour 
faciliter son réglage. ‘F3/F4! 
changent l'heure, "F5/F6" Les mi- 
nutes, "F7/F8' Les secondes et "F1! 
La fait repartir. En effet, toute 
modification de L'heure arrête La 
pendule et seule une écriture dans 
Le registre des dixièmes La fait 
repartir. 


Pour terminer, qu'en est-il de 
La précision ? Eh bien, c'est assez 
décevant car elle retarde de plu- 
sieurs minutes par heure. Les amé- 
ricains ont peut-être plus de chan- 
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ce? Sans doute ce défaut a-t-il été 
Les derniers modèles, 
ceux de La troisième génération, Le 


corrigé sur 


LA 
ren. 


ia 
4û 
an 
ëli 
FE 
SE 
sû 
1 HE 
1ia 
12û 
1sû 
1 46 
15h 
L'éE 
175 
18 
154 
cE 
214 
ze 
£aE 
48 
Perl: 
PAS) 
avé 
£sû 
255 
cree 
aid 
32Ù 
sa 
34@ 
356 
SEE 
37a 
EEE 
336 
4 
dif 
424 
43Ùû 
44 
+54 
CTETU) 
47 
45û 
436 
98 
mi 
52 


550 


mien appartenant à La seconde ? 





Hervé LE MARCHAND 


| CODE SOURCE FAR L'ASSEMBLEUR MIKRO | 


k=+CUGE 
ECRAH 
COULEUR 
DIXIEME 
SECONDE 
MINUTE 
HEURE 
INITID 


INTER 
WETDGETOT 


FORMAT 


METECR 
METECRAH 


HHHHEN 


LA 
STA 
LOA 
TA 
SET 
LTA 
STA 
TA 
STA 
GT 
RTS 
BYT 
LTXx 
LT 
AnT 
JSR 
LIIA 
JSK 
LIA 
SR 
L.TiA 
JSF 
LI 
JSF 
LIT 
JE 
LOA 
Ci A 
J5F 
JF 
TAT 
LER 
LSR 
LSF 
LER 
JSF 
T'rA 
Ai 
ÛRA 
STA 
LD 
STA 
Trié 
RTS 


+ü4+n8 
FD5aa 
FUCGE 
UC 
+DCOA 
+DCUE 
as 14 
INTER 
+0315 
INTER+1 


#<WETDGETOD 


&U3 14 


#>WETIGETOD 


+315 


g, 4 
#ü 

HEURE 
#$7F 
FORMAT 
#° :+#$50 
MHETECRAN 
MINUTE 
FÜRMAT 
#°:+FRÙ 
METECRAN 
SECONDE 
FORMAT 
#° : +540 
METECRAN 
DIXIÈME 
# “Li+ EG 
METECRAH 
£ INTER) 


A 
fi 
A 
Fi 
METECR 


#$UF 
#‘U+$B 
ÉCRAN: X 
54€ 
COULEUR ; X 


5 Came 


SAUVE L'ANCIEN VECTEUR 


ET LE REMPLACE PAR LE HOUVEAU 


UN RENTRE ICI 
ELIMINE AM/Ph 


ET CH SORT LA 


CHIFFRE DES DIZAINES DANS À 
QUE L’ON VA RFFICHER 


AVEC LE CHIFFRE DES LNITES 
EN CONTRASTE INVERSE 

EM HAUT À GAUCHE IDECALE IE X 
AVEC LA COULEUR D'ECRITURE 


ET Oh REVIENT 
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C080 AD i4 @3 LDR $ü314 ce20 29e AND #$7F CO48 &C 19 C9 JF <#Cü13) 


C@03 8D 19 CO STA $CA19 Ccaz2 20 4B CQ JSR $CU4B CÜ4E AS TAY 

co86 AD 15 @G3 LDR #$0315 CO25 A9 FA LODA #$BA CO4C 4 LSR 

Co89 8D 1A CO STA $SCOUIR CcO27 24 58 CO JSR $COUSS CO4D 4A LSR 

cuac 78 SEI CO2A AD GA DC LIA $DCOA Cÿ4E 4A LSR 

ca6D A9 1B LUA ##1B Ca2D 2@ 4B CO JSR $CG4H CO4F 4A LSR 

COGF 8D 14 03 STA #0314 Ca30 ÀA9 BA . LDR ##BA COS 20 56 CO JSR $Ca56 
Côiz A9 CÙ LDA ##CO ca3z 206 58 CG JSR $COS6 CO53 58 TYA 

COi4 8D 15 03 STA $0315 CO33 AD @3 DC LDA $0C09 CGS4 23 CF AND #$OF 
CO17 58 CLI CO38 20 4B CO JSR $CA4B CO56 A9 BO ORR #$B0 
C618 68 RTS CO3B A9 Ef LDA #$5A Ca58 9D 0 Ad STA +ü40ÿ, » 
cais aù BRK CO3D 26 54 CA JSR $COSS CASE AD 96 UZ LOA $U206 
CGinA 66 ERK Co4à AD @8 DC LIA $UCGS COSE 9D 00 DE STA $NEUA, x 7 
Cais Az GO LUX #+üÿ Co43 09 80 ORA #$BO CGël EB INX 

CG1D AD 6B DC LDA $UCAB Ca45 20 58 CO JSR #COSB CO6z 60 RTS 


coae AD 14 3 8D 13 CO AD 15°%,..,.—+, 
Cü08 03 8D 1A CO 78 A9 1B 8D’...—.F.. 
CO1G 14 A3 A9 CG BD 15 A3 587..P—.,..Xx 
CO18 60 06 GG AZ OÙ AD GB LDC”... +. K 
CO28 29 7F 28 4B CO A9 BA 20°). K—FJ 
Co28 58 CG AD QAR DC 20 4B Ca”x-t.# K— 
CO38 A9 BA 24 58 CO AD @9 DC’FJ x— 
CO38 20 4B CA A9 BA 20 58 CO” KFJ x— 
CG4@ AD @& DC @9 BO 20 58 CA” +... r X— 
CO4S 6C 19 CO AS 4R 4A 4R 47... -mJJJJ 
COsQ 20 56 CO 98 29 OF 09 BA” V—.3..r 
C056 SD @@ @G4 AD 86 @2 9D Ag”... !:.... 
CO68 DS ES 66 A9 31 8D 14 03°#..F1... 


REM w#k FENDULE C-64 HERVE LE MARCHAND ##3% 

PRINT" TD REGLER LA PENDULE AVEC LES TOUCHES" 

PRINT"M PROGRAMMABLES ‘F1’ JUSQU'À ‘F8°" 

SYS 49152:REM INITALISE LE WELGE 

POKE 56334, 129:REM SECTEUR À 50 HERZ 

POKE 56335,PEEK(S63352 AND 127 : REM REGLAGE DE LA PENDULE € # ALARME 3 
HE=56991 : MN=HE-1 : SEmHE-2:DImHE-3:REM HEURE: MINUTE: SECONDE 
POKE646, 1 : POKE6SO, 128 


GET R#:'IF R$='"" GOTO 100 

ReASCCRSD:IF R€13I ÜR R>149 GOTO 168 

IF R=133 THEN POKE 56328.0:POKE 646, 1:ENL'REM FAIT DEMARRER LA PENDLLE 
IF R«137 THEN POKE HE:@:POKE MN.@:PFOKE SE.G:GOTO 1@2:REM INITIALISE 
Ne(Re138)-(Ra1343:IF XeQ GOTO 1EÙ 

POKE 646, 14: ##FEEKCHE> AND 31:GOSUBS3@0:IF v>-1 AND v<193 THEN POKE HE; v 
Ræ=(R=1392-(Re135):1F X=ÿ GOTO 188 

POKE 646, 10: Y=PEEKCMND : GOSLIB3QG : IF Y>-1 AND v€<S@ THEN POKE MN: 
HæCRæ1dG)-(RalSED IF =D GOTO 204% 

POKE 646,13: Y=#PEEKÇSE) : GOSLIBSQQ: IF v2>-1 AND <9û THEN PÜKE SE; 

GOTO 1@8 


REM CONVERSION DES DONNEES 

.Ley AND 15:HeINT(#/ 163 'LeL+X:IF LeiD THEN Leg :HsH+i 
IF L<Q THEN LeS'HeH-1 

vs 16HH+L : RETURN 
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Voici un quiz destiné à véri- 
fier votre connaissance de votre 
COMMODORE mais La plupart des ques- 
tions (marquées *) s'appliquent à 
L'ORIC et à l'ATARI aussi. Réponses 
au prochain numéro. 





Un programme se résume à 
10 X = X + 1 : GOSUB 10 
Au bout de très peu de temps, 
ce programme s'arrête et affiche un 
message d'erreur: OUT OF MEMORY 


alors qu'il reste plus de 31 K de 
Libres. 


. Pourquoi a-t-on ce message? 


Quelle est alors La valeur 


Jo 


de X 


. Quel renseignement apporte 
La valeur de X à l'arrêt ? 





On modifie ce programme en 
remplaçant Le GOSUB par un GOTO. 
Cette fois Le programme ne s'arrè- 
tera que lorsque X aura atteint La 
valeur Limite acceptable pour une 
variable. 


Dans combien de temps le pro- 
gramme cessera-t-il de tourner pour 
annoncer "OVERFLOW ERROR IN 10" 


On modifie encore un peu le 
programme : 





10 X = 2 x X : GOTO 10 


Dans combien de temps Le pro- 


gramme cessera-t-il de tourner pour 
annoncer que X a atteint La valeur- 
limite ? 





On ajoute au programme précé- 
dent La ligne : 


D D D 


Au bout de combien de temps Le 
programme cessera-t-il de tourner ? 


Question subsidiaire : comment 
peut-on mesurer cette durée en li- 
mitant Le mieux possible Les er- 
reurs de manipulation ? 





Un programme se limite à 


10 DATA A, B, C, D : GOTO 10 


Que va-t-il se passer si l'on 
fait RUN ? 





Même question en remplaçant 
Le mot DATA par Le mot REM. 





On a Le programme suivant : 


10 DATA 5 
20 READ X 


DATA 16 
READ Y 


Pourra-t-on Lire Y ou bien 
aura-t-on Le message OUT OF DATA? 





On a Le programme suivant : 


10 FOR I = 1 TO 10 
20 DATA 5 

30 READ A% (I) 

40 NEXT 





Aura=-t-on ou non Le message 
"OUT OF DATA" ? 


Dans un programme, on à : 





10 IF A$ THEN PRINT ‘OUI" 


Si L'on fait RUN, verra-t-on 
s'écrire "OUI" ? 


Même question si Le programme 
commence par 5 A$ = ‘'" 





Est-il possible de faire un 
INPUT sans point d'interrogation ? 
(Un vrai INPUT et non une imitation 
fabriquée avec une série de GET) 


0 _ re Con e 








On a La Ligne suivante : 


10 GOTO 100 : REM ON SAUTE A 


LA FIN DU PROGRAMME. 


, Aura-t-on des 


ennuis si on 
supprime Le mot REM ? é 


Quel est l'intérêt d'écrire 





DIM A$ (3) 





1% + Quel message d'erreur aura-t- 
on si L'on écrit (Vrai aussi sur 
ORIC) 

10 A$C1) = “TOTO" 

20 DIM A$(10) 





Que manque-t-il au programme 
suivant pour qu'il marche (Vrai 





Rien dans Le système Oric ne 
semble permettre cette chose pour- 
tant essentielle: garder une copie 
durable du catalogue de vos dis- 
quettes. 


Le petit programme ci-dessous 
donne La solution. L'ordre !DIR 
peut se mettre dans un programme 
et, lorsqu'il est fini, on passe à 
La suite du programme. Donc si 
cette suite est une copie écran- 
imprimante, vous aurez votre cata- 
Logue sur imprimante... 


... ou plutôt La dernière page 
car Le catalogue est en plusieurs 
pages. Tant qu'on n'est pas en 
dernière page on vous dit ‘press 
RETURN to continue". L'astuce est 
que si, lorsque vous avez une page 
intermédiaire, au lieu de taper 
RETURN vous tapez sur La touche 
ESC, Le programme sort du !DIR et 
fait La suite qui n'est autre que 
La copie d'écran. 





aussi sur ORIC) : 


10 RACINECX) = SQR(X) 
20 X = 25 
30 PRINT RACINE(X) 


Vous savez qu'en temps normal 
PEEK (52) + 256 x PEEK (53) = 32768 
et vous avez peut-être quelquefois 
modifié Le contenu des cases 52 et 
53 pour abaisser La frontière entre 
La zone de travail Basic et l'é- 
cran. Pensez-vous que si pour une 
fois vous augmentiez Le contenu de 
la case 53, vous pourriez voler 
quelques octets à La mémoire d'é- 
cran et en faisant PRINT FRE(CO) ob- 
tenir enfin un nombre supérieur à 
31745; ? 


René BASSABER 


Le problème est qu'il va fal- 
loir faire ça pour chaque page. 


RUN. IL s'affiche la 1ère 
Faites ESC. La 1ère page se 
copie. Refaites RUN. Il s'affiche 
La ‘1ère page. Faites, RETURN. IL 
s'affiche La 2ème page. Faites ESC. 
La 2ème page se copie. Et caetera.. 
et caetera... mais il est rare 
qu'il y ait plus de 2 pages sur Le 
catalogue. 


Faites 
page. 


L'instruction 20 fait remonter 
Le curseur, sinon Les Lignes du 
haut de l'écran disparaîtraient. 


10 '!'DIR O 

20 PRINTCHR#(11);CHR#(11); 

30 FORY=OTO26 

40 FORX=1TO38: C=SCRN(X, Y) 

30 LPRINTCHRS(C) ;:NEXT:LPRINT 
60 NEXT 


Honoric de BALSA 
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Nous commençons par Les quelques notions sur l'architecture de l'Atari 
qui sont indispensables pour comprendre comment fonctionne l'affichage de cet- 
te machine. Il faut noter que cette architecture est La même pour Les anciens 
modèles 400 et 800 et pour Les nouveaux 600XL et 800XL. 


Comme pour Les VIC, 64, ORIC et d'autres, l'intelligence du microproces- 
seur 6502 est secondée par celle d'un second processeur, Le processeur graphi- 
que. Mais, alors que dans Le VIC il y a un seul boîtier secondaire (Le 6561), 
que dans Le 64 ou L'ORIC il y a un processeur secondaire (Le 6567, ou L'ULA) 
et un synthétiseur sonore (Le 6581 ou Le GI AY3-8192), il y a dans l'Atari 
trois boîtiers annexes: ANTIC, Le GTIA/CTIA et "“POKEY". 


x POKEY s'occupe principalement du son, maïs il comporte en plus des ports 
d'entrée-sortie. Atari n'a publié aucune explication des noms de ses boîtiers- 
maison. Pour POKEY, c'est simplement qu'on écrit souvent dans ses registres 
internes par des POKE. 


* GTIA est un boîtier d'interface télé. Nous pensons que son nom veut dire 
“adaptateur d'interface télévision général" (General Television Interface 
Adaptor), mais c'est une conjecture. Les modèles Les plus anciens étaient 
équipés de CTIA (Color Television Interface...) aux possibilités un tout petit 
peu plus restreintes (quelques modes en moins), mais, à notre avis, tous Les 
Atari 400 et 800 non XL livrés en France avaient déjà Le GTIA. Tous Les XL ont 
Le GTIA. 


* ANTIC est aussi consacré à La télé. Nous pensons — et c'est encore une 
conjecture, et de toutes façons, c'est sans importance pratique - que son nom 
veut dire ‘nouveau boîtier Atari d'interface télé" (Atari New Television 
Interface Chip). Pendant qu'on en est dans Les noms, savez vous qu'Atari est 
un cri de guerre japonais qui a donné naïssance à un jeu, lequel a été, un des 
premiers jeux à être informatisé. On aura bientôt Les ordinateurs Banzaï. 


La formation d'images est donc répartie entre ANTIC et GTIA. Le GTIA 
hérite des tâches subalternes de construction des signaux analogiques, de 
synchro, de couleur, etc... tandis qu'ANTIC se charge des tâches nobles d'or- 
ganisation de l'image. 


L'encadré à La fin de cet article donne La Liste des registres des boî- 
tiers d'entrée-sortie. L'adresse entre parenthèses après certains registres 
est ce qu'on appelle L'adresse du registre fantôme associé. C'est en fait une 
adresse mémoire. Le contenu de certains registres est en effet très transi- 
toire: à des instants précis Le système recopie dans Le registre hardware Le 
contenu du registre fantôme associé et on a plutôt intérêt, dans Les program- 
mes, à écrire dans Les registres fantômes plutôt que dans Les vrais registres. 
Pour chaque registre on a indiqué Le nom symbolique qui lui est habituellement 
donné dans La Littérature. Un second encadré donne La carte d'implantation 
mémoire des XL montrant comment, par recouvrements, on arrive à dépasser La 
limite des 64 K. 


D-J DAVID 
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GTIA / CTIA 


D000 
D001 
D002 
D003 
0004 
D005 
D006 
D007 
D008 
D009 
DOUA 
D008 
DOOC 
DO00 
DO0E 
DOOF 
D010 
D011 
D012 
D013 
D014 
D015 
D016 
D017 
D018 
D019 
DO1A 
D018 
D01C 
D010 


DO1E 
D01F 


53248 
53249 
53250 
53251 
53252 
53253 
53254 
53255 
53256 
53257 
53258 
53259 
53260 
53261 
53262 
53263 
53264 
53265 
53266 
53267 
53268 
53269 
53270 
53271 
53272 
A0E72 
53274 
53275 
53276 
53277 


53278 
53279 


mm mm 


FAOrMEMEMEMEMEMEMEMEMEMOEMEMEMEMEMEMEmMmemMmemrm 


HPOSPO 
MOPF 
HPOSP1 
M1PF 
HPOSP2 
M2PF 
HPOSP3 
M3PF 
HPOSMO 
POPF 
HPOSM1 
P1PF 
HPOSM2 
P2PF 
HPOSM3 
P3PF 
S1ZEPO 
MOPL 
SIZEP1 
M1PL 
SIZEP2 
MePL 
SIZEP3 
M3PL 
SIZEM 
POPL 
GRAFPO 
P1PL 
GRAFP1 
P2PL 
GRAFP2 
P3PL 
GRAFP3 
TRIGO 
GRAFM 
TRIG1 
COLMO 
TRIG2 
COLM1 
TRIG3 
COLM2 
PAL 
COLM3 
COLPFO 
COLPF1 


COLPF2, 


COLPF3 
COLBK 

PRIOR 

VDELAY 
GRACTL 
HITCLR 
CONSOL 


position horizontale joueur 0 
collision missile 0 - écran 
position horizontale joueur 1 
collision missile 1 —- écran 
position horizontale joueur 2 
collision missile 2 - écran 
position horizontale joueur 3 
collision missile 3 - écran 


position horizontale 
collision joueur 0 - 
position horizontale 
collision joueur 1 - 
position horizontale 
collision joueur 2 - 
position horizontale 
collision joueur 3 - 
taille joueur 0 
collision missile 0 
taille joueur 1 
collision missile 1 
taille joueur 2 
collision missile 2 
taille joueur 3 
collision missile 3 
taille des missiles 


missile O0 
écran 
missile 1 
écran 
missile 2 
écran 
missile 3 
écran 


joueur 
joueur 
joueur 


joueur 


coll. joueur 0 - joueur 
forme joueur 0 
coll. joueur 1 - joueur 
forme joueur 1 
coll. joueur 2 - joueur 
forme joueur 2 
coll. joueur 3 - joueur 
forme joueur 3 


gachette joystick 0 
forme des missiles 
gachette joystick 1 


couleur joueur et missile 0 


gachette joystick 2 


couleur joueur et missile 1 


gachette joystick 3 


couleur joueur et missile 2 


O0 si PAL, 14 si NTSC 


couleur joueur et missile 3 


couleur écran 0 
couleur écran 1 
couleur écran 2 
couleur écran 3 
couleur fond 
priorités sur l'écra 
délai vertical 
contrôle objets 


n 


vide registres collisions 


image des touches 


Dr Conte ni #4 





($284,644) 


($285,645) 
($2C0,704) 
($286,646) 
($2C1,705) 
(S287,647) 
(S2C2,706) 


($2C3,707) 
($2C4,708) 
($2C5,709) 
(S2C6,710) 
(S2C7,711) 
(S2C8,712) 
($26F,623) 


OPTION, SELECT et START 


(pas HELP). 














POKEY 


D200 53760 E AUDF1 frequence canal sonore 1 

É POTO potentiomètre (raquette) 0 (5270,624) 
D201 53761 E AUDC1 contrôle canal 1 

L'HSPOTM pot. 1 ($271,625) 
D202 53762 (3 AUDF2 fréquence canal 2 

Le “POT2Z pot. à ($272,626) 
D203 53763 E AUDC2 contrôle canal 2 

Lan POTS pot. 3 ($273,627) 
D204 53764 E AUDF3 fréquence canal 3 

L POT4 pot. 4 (pas sur XL) ($274,628) 
D205 53765 E AUDC3 contrôle canal 3 

L POTS pot. 5 (pas sur XL) ($5275,629) 
D206 53766 E AUDF4 fréquence canal 4 

L POTé pot. 6 (pas sur XL) ($5276,630) 
D207 53767 E  AUDC4 contrôle canal 4 

L POT7 pot. 7 (pas sur XL) ($277,631) 
D208 53768 E  AUDCTL audio contrôle 

E ALLPOT validité potentiomètres 
D209 53769 E STIMER démarrage temporisateurs 

L KBCODE code clavier ($S2FC,7/64) 
D20A 53770 E SKREST reset du registre d'état série 

L RANDOM nombre aléatoire 
D208 55111 E POTGO démarrage séquence lecture des potentiomètres 
D20C 53772 inutilisé 
D20D 53773 E SEROUT sortie sur port série 

L SERIN entrée sur port serie 
D20E 53774 E IRQEN activation des interruptions 

L IRQST état des demandes d'interruptions 
D20F 53773 E SKCTL contrôle port série ($232,562) 

L - SKSTAT état port serie 
ANTIC 
D400 54272 E  DMACTL commande DMA ($22F,559) 
D401 54273 E CHACTL mode caractere (52F3,759) 
D402-3 54274-5 DLISTL/H pointeur (bas/haut) vers La ($230-231 

display List ,°60-561) 


D404 54276 E HSCROL autorise déroulement horizontal 

D405 54277 E VSCROL autorise deroulement vertical 

D406 54278 inutilisé 

D407 54279 EG PMBASE octet haut de l'adresse de base 
des joueurs et missiles 

D408 54280 inutilisé 

D409 54281 E CHBASE départ du générateur de 


caractères (octet haut) ($2F4,756) 
D40A 54282 E  WSYNC attente synchro V 
D40B 54283 L  VCOUNT n de ligne de balayage / 2 

va de 0 à 155 en PAL 
D40C 54284 L PENH pos. horizontale du Light pen ($234,564) 
D40D 54285 L  PENV pos. verticale du Light pen ($234,564) 
D40E 54286 E NMIEN autorise Les interruptions NMI 
D40F 54287 E NMIRES RAZ des NMI 

L NMIST état des NMI 


5 Com à EYT 





D300 54016 PORTA joysticks 0-1 (5278-279,632-633) 
paddles 0-3 ($27C-27F,636-639) 
D301 54017 PORTB joysticks 2-3 (pas sur XL) ($27A-27B,634-635) 
paddles 4-7 ($280-283,640-643) 
D302 54018 PACTL contrôle port A, moteur cassette : 
POKE 54018,52 démarre ; POKE 54018,60 arrête 
D303 54019 PBCTL contrôle port B 





A B C C D D 
0 0 0 4 0 8 
0 0 0 0 0 0 
0 0 0 0 0 0 


OoootHm 







BASIC ATARI 
(absente dans le 
1200 X L) 















; > RAM 8&K 

0 F sélectionnée en 

0 F désact BASIC ATARI RAM 10K 
sélectionnées 







ensemble en 
désactivant l'OS 






ROM &K en 
cartouche 
désactive 

automatiquement 

BASIC ATARI 


ROM diagnostic 








ROM 16K en cartouche 


(ex. BASIC MICROSOFT) 





GG : générateur de caractères 
GCI : générateur de caractères internationaux 
VF : virgule flottante 


se mnade n° IT 






eneu 
96| 16 | 98| 18] 9Z | 2Z | 89 | #9 | 09 | ZS | PS | IS | 8 | Gp | Ep | Op] 8€ | JE] PE |CE| OE| 82 peus 


esseq 
uos 
-derp 
Va | IN IS y OS Va! IN daù IS £vT WON 


Le es | LT ESS EEE UT ET SRE 
Dei SERRE E Mi"... % 
Ce ere D RSR RE - 1en-@i7 | “EE T3 

LE eu LA ares | 1 I@UTI ET EPL:b 1e 


Les Ni } © 


f = 





eme 
Le | GG |ve | 8 | Ie | O8 | 61 | 81 LI TROT PI] ETI ET “El AITA OM) OL, 6: | 6: |» 8 bei] 


esseq 
q v 9 d | 4 a re) 
"OS VA! IN er £OG IS vT OS Va! IN au &Oa UON 


L [| lolo alesen LIT TT OT TT TT LE x 


SIRET] TT ERIC | Hits SaPE Let | 4 
SOIR. <COSSAIBE MIRE FSU URI 
NT TIDEERF SNEMREISET TON ICS 
DRE) | «ESS 127, 1 040 TS LT | Ton 
&- 
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26 





Le défilement vertical et vers 
Le haut est indispensable à tout 
éditeur d'écran. Il n'en est pas de 
même des autres types de défile- 
ment. Voici 2 programmes en assem- 
bleur permettant d'obtenir Le défi- 
Lement à gauche et Le défilement à 
droite. 


En réponse -à L'article “17 
questions" de La rubrique ‘Le cour- 
rier des Lecteurs® de LA COMMODE 
n° 8, question n 13, on répon- 
daiît qu'il est très difficile de 
deplacer L'écran de gauche à droite 
et de droite à gauche :il n'en est 
rien ! 


Deux programmes en assembleur 
(vitesse oblige) tournent parfaite- 
ment sur mon 64. Le premier fait un 
deplacement en scrolling gauche et 
Le second fait un scrolling droit. 
Vous me direz que c'est plus facile 
sur Le 64 que sur Le VIC 20; eh 
bien non, Les deux programmes peu- 
vent tourner sur n'importe quelle 
bécane" 6502 en modifiant seule- 
ment 4 paramètres. 


Voici Les modifications à fai- 
re pour Le VIC 20 : 


. Changer l'adresse de début de La 
RAM écran : de 50400 (en 1024) pour 
Le 64 on passe à $1E00 (Cou 7680) 
pour Le VIC 2Ù 


. Changer l'adresse de début de La 
RAM couleur : de $5D800 Cou 55296) 
pour Le 64 on passe à 59600 (ou 
38400) pour Le VIC 20 


. Changer La taille des Lignes : 
de $27 et 528 (40 colonnes) pour Le 


64, on passe à %515 et 516 (22 
colonnes) pour Le VIC 20 


.« Changer Le nombre de Lignes: de 
519 (25 lignes) pour Le 64 on passe 
à $17 (23 Lignes) pour Le VIC 20. 


Ces modifications apparaîssent 
en noir et entre parenthèses dans 
la marges réservée aux commentai- 
res; il suffit de mettre Le chiffre 
héxadécimal qui est dans La marge à 
La place de celui qui est dans le 
programme. 


L'algorithme de ces programmes 
est simple. 


Pour Les scrolling gauche : 

1) initialisation 

2) début Ligne 

3) on prend le caractère suivant 
que L'on met Là où on est (en 
(SFB) , Y) 

4) pareil pour La couleur 

5) incrémentation n colonne 

6) fin Ligne ? oui -=>7 non ->3 

7) saut de Ligne 


8) fin écran ? oui ->Fin non ->2 


Ce programme est stocké à par- 
tir de 49152 ($C000). Sur le VIC, 
il sera stockée à partir de 828. 


La possibilité de changer Les 


"4 paramètres permet non seulement 


de Le faire marcher sur un bon nom- 
bre de 6502 maïs aussi de faire des 
scrollings_partiels en définissant 
donc des fenêtres. 


Philippe VAGNER 


: ons NUIT = 


4 





initialisation début mémoire (1E) 
couleur $0800 ($SFD et $FE) 
écran $0400 ($FB et $FC) 


(96) 


BCLLGH LDY #500 
BCLCOL INY 


boucle ligne 
boucle colonne 
scrolling caractère 


scrolling couleur 


fin de ligne? (15) 
si non, on va en boucle colonne 
dernier caractère à blanc 

(520 = 32) 


saut de ligne (528 = 40) 
pour caractères (16) 


saut de Ligne pour couleur 
(16) 


Fin d'écran (17) 
; si non on va en boucle Ligne 
fin 


CPX #519 
BNE B8CLLGH 


° 
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LDA #504 ; mêmes commentaires que pour Le (1E) 
STA S$FC ; programme de scrolling gauche 
LDA #500 
STA %5F8 
STA $FD 
LoA #508 (96) 
STA %5FE 
LOX #500 
BCLLGN LDY #527 (15) 
BCLCOL DEY 
LDA ($FB),Y 


ÉS ne Lena n° 11 











STA ($FB),Y 


DEY 
LDA (CS$FD),Y 

INY 

STA ($SFD),Y 

DEY 

8NE BCLCOL 

LDA #f20 

STA (SF3),Y 

CEC 

LDA S$FB 

ADL #528 (16) 
STA S$FB 

LDA #500 

ROL A 


ADL 5FD 


STA 5FC 

x fs 

LDA FD 

ADL #528 (16) 
STA SFD 

LDA #500 

ROL À 

ADC Y#SFE 

STA HS$FE 

INX 

CPX #519 (17) 
BNE BCLLGH 

RTS 





IL est toujours ennuyeux de devoir 
retaper Les programmes à compacter. 
Voici une petite astuce qui peut 
vous faire gagner du temps et du 
calme: 


ex: 10 PRINT AS 
20 A=A+2 
30 GOTO 10 


IL est fatiguant de réécrire sur La 
ligne 10 Les lignes 20 et 30 (sur- 
tout si celles-ci sont longues ou 
compliquées, cas de POKE). 


IL suffit de rajouter des espaces 
en 20 et en 30: 


10 PRINT AS 
: A=A+2 
: GOT010 


&W 
oO 


Pour que Les espaces soient accep- 
tés, mettre un ‘:" au début puis 
Les espaces et un autre ‘:'"" pour Le 
compactage. 


Faire alors: LIST 30 
ce qui donne: 


50 : :GOT010 
READY 


remonter sur Le LIST et mettre 
LIST20 qui donne: 


20 : : A=A+2: GOT010 


remonter de nouveau sur Le LIST et 
mettre LIST10 qui donne: 


10 PRINT A$:A=A+2:GOT010 


L'astuce est simplement de mettre 
Le nombre de blancs nécessaires 
pour que 2 lignes ne se chevauchent 
pas... et surtout de bien remonter 
sur Le LIST écrit à l'écran, pour 
que La ligne antérieure s'imprime 
juste devant celle déjà à L'écran. 


IL vous reste bien sur à supprimer 
Les lignes devenues inutiles. 


D. Cond n°41 








POKE44 ; 28: POKE46, 28 :POKE4B, 28 

POKE43, 1 :POKE4S, 3: POKE47,3:POKE49,3 
POKE28%256 , 0 : POKEZ29%256, 9 : POKE39#256, Q 
POKE198, 7 : POKE631, 76 : POKE632, 207 : POKE693, 193 
POKE6S4, 82 : POKE63S, 213: POKE636, 13: MEW 





FRINT"OIMM ATTENDEZ UN INSTANT" 
FORI2512@T07167 
POKEI , PEEK(29696+1 ) 
HEXT 
POKE36869, 295 
FORI=1T023 
RERDA 
FORJ=ATOR+7 
RERADB 
POKEJ,B 
HEXT 
MEXT 
PRINT'OIM SAIL —e d—7,] @" 
PRINT'M re 28 ze =" 
PRINT" Je ju ee =" 
PRINT'N ms ##M U=- be," 
PRINT" ee MMM #71  L' 
PRINT'M =, sm, [mi] = 
PRINT'M "=" 
PRINT'M me£ WPa£+SHIFT" 
PRINT'"'M m=P] f=FL-CHE HAUTE" 
POKE198,7:POKE691,76:POKE632, 207 :POKE633, 13 
POKESS34, 82 : POKE635, 2193: POKE636, 13 
END 
DATAÉGOOG,32,16.56,4,60,69,59,0:REM ---- À 
DATRA6D16, 4,9,56,4,69,69,59,0 
DATAS992,24,36.,56,4,60,69,59,0Q 
DATA6129,26,0,56,4,69,68,59,0 
DATAEG24, 4,9,60,66, 126, 64, 60, @:REM te LE ES E 
DATA6H92,32,16,60,66,126,64,60,0 
DATAS384, 24,36,60,66, 126, 64,62, 
DATR6104,36,9,60,66,126,64,62,0 
DATASS04,6,9,0,24,9,9,28,0:REM ------—- I 
DATASS396, 24,36,24,9,9,9,29,9 
DATAS344,36,0,24,9,4,8,29.0 
DIATA6GSS, 4,9,60.66,66.66, 6Q.Q:REM ----- 0 
DATR6QO8, 24,36,60.,66,66.,66,60,09 
DATAG96G4,:36,0,60,66,66.66,60,8 
DATA6A6Q, 4,9,92,66,66,79,59,Q:REM ----- U 
DATA6972,32,16,74,66,66,79,58,08 
DATA6G48, 24,36,0.66,66, 70.509,80 
DATA6956,36,9,66.66,66. 70,58, 0@ 
DATAS952,609,9,92,98,66,66,66,Q0:REM ---- CEDILLE 
DATASS60,30,64,98,90,70.66,66,D:REM --- EHE 
DATA6112.0,9.60,66,72, 82,60, 64 
DATAS369,9,0,9,8,83,9,8,Q'REM —--------- 7? RENVERSE 
DATASS72,9,9:8,16,32:96,:24,D:REM ------ | RENVERSE 


Francis ESTEVE 
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Alors que Les disques du 64 
sont apparus depuis Longtemps puis- 
que ce sont Les mêmes que pour Le 
VIC, ceux de L'ORIC ne sont apparus 


que récemment. Ceux de L'ATARI 
(810) existent depuis Longtemps, 
mais un nouveau modèle (1050) à 


l'esthétique XL est apparu récem- 


ment. 


Le but de cet article n'est 
pas d'expliquer en détail Les ins- 
tructions disque, mais d'insister 
sur quelques points importants 
quelquefois négligés par Les débu- 
tants. Ces points sont d'ailleurs 
Les mêmes sur tous Les systèmes. 





Les disquettes se connectent 
par Le connecteur périphérique 
(trapézoïdal). Comme Le connecteur 
est double, on peut enchaîner Les 
connexions. On peut mettre jusqu'à 
4 unités qui auront pour noms de 
périphérique D1:, D2:, D3: et D4:, 
par défaut D: désigne l'unité 1. Le 
numéro se détermine par des petits 
interrupteurs sur l'unité. 


Oric 

Les disquettes se montent sur 
Le bus d'extension par un câble 
plat. Le connecteur d'extension est 
répété 2 fois ce qui permet d'au- 
tres connexions. On peut connecter 
jusqu'à #4 disquettes (0 à 3). La 
disquette 0 est dite disquette maî- 
tresse. Les autres sont dites es- 
claves; elles sont d'un type diffé- 
rent: La maîtresse a un bouton de 
Reset rouge. Nous pensons que, pour 
Le moment, Oric ne Livre que Les 
disquettes maîtresses. La disquette 
est Livrée avec une alimentation 
qui alimente en outre l'unité cen- 
trale et une 2ième disquette. C'est 


un bon point, alors que l'Atari 
multiplie Les boîtiers d'alimenta- 
tion. 





Grande différence entre Les 
deux: Atari utilise Les disquettes 
5 pouces 1/4 bien connues. Oric 


utilise Les micro-disquettes 3 pou- 
ces. C'est un bon: point pour l'en- 
combrement mais Les disquettes 
vierges sont chères et plus diffi- 
ciles à trouver: nous avons eu 
nous-mêmes beaucoup de problèmes 
pour nous en procurer. 





L'unité 1050 peut fonctionner 
sous deux densités (simple ou dou- 
ble) sous DOS 3. L'unité 810 fonc- 
tionne en simple densité sous DOS 
2. En simple densité on a 87 K dis- 


ponibles (catalogue déduit). En 
double densité on a 127 K par dis- 
quette. 

L'unité 1050 peut Lire Les 


disquettes simple ou double densi- 
té. Les disquettes qu'elle a forma- 
tées et écrites en simple densité 
(c'est une option de La commande de 
formatage I) peuvent être lues par 
l'unité 810. Enfin, sur 1050 sous 
DOS 3, on peut convertir les fi- 
chiers DOS 2 en DOS 3. 


Oric 

Les disquettes utilisables 
sont des Hitachi FC1 ou FC2. Chaque 
disquette a deux faces. L'unité 
Oric n'ayant qu'une tête de lecture 
écriture, il faut retourner La dis- 
quette pour utiliser La 2ième face. 
IL y a 159 K par face,de capacité. 

IL faut noter que l'unité de 


Me male n° 77 


F7 


CL 


disquette est connectable tant à 


l'Oric-1 que L'ATMOS. 






Les commandes disque sont de 
deux sortes: 
1- gestion de La disquette, 
globalement soit au niveau 
fichier. 


soit 
d'un 


2 lecture-écriture de données dans 
Les fichiers. 


Sur Atari, Les commandes de 
type 1 sont toutes accessibles par 
un menu, ce qui est très pratique. 
Les instructions de lecture-écritu- 
re sont des cas particuliers des 
instructions d'E/S Basic dans Les- 
quelles on spécifie Le périphérique 
Di 


Sur Oric, toutes Les commandes 
sont des instructions supplémentai- 
res de Basic (elles commencent par 
1) utilisables en mode. direct ou 
programmé. 





Globales 


Formatage : Toute disquette 
vierge doit subir un formatage. 
C'est La commande I (Init disk) sur 
Atari et !FORMAT sur Oric. Sur Ata- 


ri, on a l'option de La densité. 


Duplication : Permet de dupli- 
quer une disquette sur une autre. 
Lorsque vous n'avez qu'une unité, 
Le système vous indique sur l'écran 
qu'elle disquette source ou desti- 


nation monter (il y a plusieurs 


montages et démontages). Sur Atari, 
c'est La 
sur Oric 


commande Duplicate (D), 


c'est !BACKUP. 





A La différence des Commodore, 
tant Les unités Atari que Oric 
n'ont pas Le système d'exploitation 
(DOS) en ROM. Celui-ci réside sur 
La disquette livrée avec l'unité. 

La première chose que vous de- 
vez IMPERATIVEMENT faire, est de 
dupliquer cette disquette en plu- 
sieurs exemplaires, avant tout au- 


tre essai de manipulation de la 
disquette. IL faut donc vous procu- 
rer des disquettes vierges avant de 
mettre votre unité sous tension. 
Catalogue : Permet de Lister Les 
fichiers présents sur une disquette 
(ex. ci-dessous). 


Oric : 

O-System B Directory Page 1 
HELP.COM 7 HELP.01 4 
HELP.03 4 HELP.02 4 
HELP.04 4 HELP.03 4 
HELP. 06 4 HELP.07 4 
HELP.08 4 HELP.09 4 
HELP. 10 4 HELP.11 4 
HELP. 12 4 HELP. 13 4 
HELP. 14 4 HELP.00 ai 
HELP. 16 4 HELP. 15 4 
HELP. 17 4 HELP. 18 4 
HELP. 19 4  SQUARE.CHS 4 
HELP.07A 4 SLANT.CHS 4 

SYSTEM.DOS 45 DESIGN.COM s 

SYS.Ccom 9 OLD.COM 1 
STD.CHS 4 BOLD.CHS 4 

BOOTUP.COM 1 TELE. DAT 3 

TELE.COM 7 DEMO. COM 2 
ORIC1.LGO 10 ATMOS.LGO 13 
MICRO.LGO 7 TEXT.O1 4 

TYPE.COM 1 


press RETURN to continue )>)> 
O-System B 
215 Used, 421 Free, Out of 636 


Directory Page 2 


Atari : 

Filename Size 
FMS SYS 004 

KCP SYS ai 


KCPOVER SYS 005 
COPY UTL @05 
DUPDISK UTL @@4 
INIT UTL 006 
CONVERT UTL @85 
GELP UTL 002 
HELP TXT @12 
HANDLERSSYS 901 


042 FREE BLOCKS 
Sur Atari, c'est La commande F 


(File index). Elle donne comme 
choix Le périphérique de sortie 
utilisé, donc il est très facile 


d'avoir Le catalogue sur imprimante 
au lieu de L'écran. 


Sur Oric, c'est La commande 
IDIR. Elle donne Le catalogue à 
l'écran, page par page (on fait 


RETURN pour passer à La page sui- 
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vante). Rien n'est prévu pour avoir 
Le catalogue sur imprimante. Heu- 
reusement La Commode est Là: voyez 
Le petit article de ce numéro qui 
permet de vaincre cette difficulté. 





copie d'un ou plusieurs fi- 
chiers. C'est C sur Atari, 
sur ORIC. 


fichiers. C'est -E sur Atari, 
IDELETE sur ORIC. 
protection/déprotection d'un 
fichier. L'un et l'autre système 
offre plusieurs options. 
changement_ de_nom R (Atari) 


IRENAME CORIC). 


Chacun des systèmes a quelques 
autres commandes que nous ne dé- 
taillerons pas ici. Notons que cha- 
cun a une commande HELP qui fait 
afficher des informations pouvant 
nous aider. 





Sur Atari, on emploie SAVE ou 


LOAD avec comme périphérique D:. 
Ex. SAVE "D:PROG'"'. L'Atari a aussi 
Le couple LIST/ENTER. 

Sur ORIC on emploi !ISAVE et 
ILOAD. Nous ne détaillons pas ici 
Les différentes options possibles. 


Sur Atari, Les commandes sont 
Les commandes habituelles Basic, 
avec D: comme périphérique. 

Un fichier doit d'abord être 
ouvert par OPEN. 


Ex. Atari OPEN #2,8,0,'"D1:FICH.DAT" 
Oric !OPEN “O-FICH.DAT",W 
On doit ensuite Lire ou écri- 
re, sur Atari par INPUT#/PRINT# ou 
GET#/PUT#, sur ORIC par !GET/!PUT 


Enfin on doit fermer Le fi- 
chier par CLOSE/!CLOSE 


I COPY 
‘ 


L'ORIC a en plus Les ordres 
ISTORE et !RECALL qui permettent de 
stocker un tableau entier et de Le 
retrouver. En revanche L'ORIC n'a, 
dans sa version actuelle aucune 
provision pour l'accès direct. 


L'Atari, lui, permet l'accès direct 
grâce aux 
POINT#. 


instructions NOTE# et 





* problèmes hardware 


reven- 
deurs nous ont dit que les disquet- 


Un certain nombre de 


tes Oric ‘grillaïient" par excès 
d'échauffement. Nous avons pu cons- 
tater un échauffement important, 
mais sans catastrophe jusqu'à main- 
tenant pour notre unité. Nous pen- 
sons que Le problème vient du boî- 
tier d'alimentation qui donne des 
tensions non régulées trop grandes, 
ce qui fatigue Les régulateurs. Il 
est probable que ce problème est 
atténuée Lorsqu'on connecte une 
2ième disquette. D'autre part, nous 
conseillons de ne pas alimenter 
l'unité centrale par Le boîtier 
d'alimentation disquette mais de 
coserver L'ancienne alimentation. 
Celle-ci donne une tension non ré- 
gulée déjà un peu trop élevée mais 
un peu moins que Le boîtier dis- 
quette. 


On peut constater que, en pré- 
sence de l'unité de disquette, lL'O- 
RIC-1 ou L'ATMOS n'arrive pas à 
lire une cassette. C'est plutôt fä- 
cheux car La première chose que 
souhaîte faire celui qui vient d'a- 
cheter une unité de disquette, 
c'est de copier sur disquette Les 
logiciels qu'il a sur cassette (at- 
tention, des logiciels achetés peu- 
vent ne pas être copiables pour 
raison de copyright) ! 


Le problème est d'arriver à 
lire Le programme sur cassette hors 
de La présence de La disquette puis 
de brancher celle-ci sans que cela 
n'efface Le programme en mémoire. 
La manip. qui permet d'y arriver 
est décrite dans ce numéro. 

D.-J. DAVID 
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1 - Présentation 


En statistiques, il existe plu- 
sieurs types de lois, Les Lois Nor- 
male, Binomiale, Uniforme pour ne 
citer que celles-ci. 


Le programme présenté calcule 
La LOI UNIFORME. 


II - Caractéristiques du Programme. 
Langage... Basic 
Capacité mémoire.. 16 K 


Machine.....csssee CBM 3000 


III - Organisation du Programme. 


En observant un phénomène phy- 
sique ou autre, on est amené a re- 
Lever certaines valeurs, et l'on 
peut vouloir Les analyser statisti- 
quement . 


Chaque pthiénomène peut répondre 
à une certaine distribution des ré- 
sultats. 


Pour Le cas du programme, il 
s'agit d'une loi du type Uniforme 
dont La distribution est La suivan- 
te: 


œet f3sont Les 
bornes de La 
répartition 
x 
Dans Le cas du programme, ïl 
faut que Le phénomène réponde à 
certaines conditions: 


1. Les mesures doïivent être orga- 
nisées en classes de largeur cons- 
tante. 


2: A chaque classe doit corres- 
pondre un nombre de réalisations de 
La variable. i 


A partir de Là, le programme 
calcule Les probabilités mathémati- 
ques, l'espérance mathématique, Les 
bornes de La répartition et Le 
coefficient déterminant si La Loi 
est suivie correctement . 


Ce programme est assez spéci- 
fique, mais peut rendre certains 
services. 


A L'intérieur . du programme, 
est inclus un exemple d'utilisation 
qui permet d'en voir Le fonctionne- 
ment, et de visualiser un type de 
tableau de résultats obtenus. 


J. BRUGEASSOU 











Pape me bebe pe bete be be he LE I Ti ON ee Gi fine Ci 


EE 


ROSE =" MTRITEIUUNFRESSEZ L 1 1 FOUR UNE AUTRE LOI 
nr :* 


PRINT" 
COLF= "IIS RBRRRBERNPERBEBDEDEBBEREEBEESBREEREDI" 
LHES#= "alelatetalTalaTeTATeRTATATATATATATATATATR TA TA TETE" 


F1 +=" STIMIRIEIelRIeRTeIeIMIAIMIRTIMMIMNFFESSEZ © 1 ] FOUR LE TAELEAU IE 
DEFFHPRCKI= LINTÉRMIAAE+E, 5 1 4108 NC VALEUR ©" 


REN DRE Si Lo ST LE 65 (EE VE PAU 2e TRE UM El LUS 
REM FRG STATISTIQUE 
REN ÊCi FRUGEASSOU J 
REM LE 19-039/1381 
FEN CE 2901 SK 
REM VERSION 1.9 421 OCTET: 
PP een en ani nirren ana tr ne 


DL] 


2 
PRINT" CALCUL STATISTIQUE 

PRINT mm! 
PRINT" LOI UHIFORME " 

GOSUFIZE 

IFFLG=1THENMXSE : GOTOSE 

IHPUT"CIN HÔMERE D'°E: FER IENCES "HE 

INPUT" HÜMERE DE CLASSES "3 HC 

IHPUT" LARGEUR DES CLASSES ";:LC 

DIHMI CHOC, IMFENCS, SUPEHCS, PRCHCS , #EMC , FEND 


se FORI=ITOHC 

26 FRINT" El" 

&r PRINT". VALEUR POUR LA CLASSE "I; :IHPUTMICI D 
28 FRINT:FRIHT 


FRIHT" VALEUR EORNE IHFC"I "5 "3: INPUTIHFGI à 


36 SUPL TO =INFÉ TO +LC 


Hs 4e Ha La He 4 4e Li LE Ci 


ù ts CN en Pi ee on 0 CT 


HEAT : Ms=f 


32 FORIS1TONC 


ÉIIEMIETASHE"KCTISCEUPÉIS+IHFL IAE 


34 PATTES 46 I HN CL) 


HEXT 

Lx=E 

FORI =1TONC 

Dsl CC CRC TM TROT Ms 0 D PSC I 0 
HEXT 

2O=SURC122:Z1=2 

Se sSiRE Ts 

FETA=E CGR + € 1 NM 1e 
FILFHAZ CE HIS) -HETA 
A1=1L"CHETA-ALFHA 5 
FÉLISÉSURE15-ALPHAT ERA: FÉHCS=CEETA-IHF CHOC 41 
FORI=ETOHC-1 
FÉIHS=ESUPÉII-IHFE TS KA 


5 FORI=1TONC 


A=MHEXP € I 2 


32 A=CCMICII-AMKEMICIS-A5 A 
23 EHIZ=EHIZ+A 


HET 


22 R=HC-5 


5 REM RESULTATS 


7 nanas n° 


F5 


PRINT" ACARACTERISTIQUES DE LA REPARTITIONS" 
PRINT" 
PRINT :PRIHT 

PRINT" EORHES DE LA REP." 

D CU NP RS CE 

PRINT" ésssssescuuuu ee « ALPHA="FHPRCALPHAD 
PRINT" nsc ssssssscue ee BETR="FNPRCBETRD 
PRINT 

FRINT" ESPERENCE MATHEMATIQUE "FHPRCHMX 

“1 1 Mu pnermpneses 

FRIHT" VARIANCE "FHPRCDE à 
PLAT RES 


PRINT" ECART TYPE MFHPFRCSK 2" 
FRINT" 
PRINT" VALEUR DU KHIZ MFHPRÉKHIE 


2 PRINT" 
à FRINT" HE. DE LEGRE LE LIFERTE'"R 
PRENDRE TON RTE ST 
F5 FRINTRIS 
F6 GETAS:IFH$S=""THENFÉE 
” IFA$="1"THENF3 
GOTOÜ11Z 
PRINT" 
IFHCSATHEN1 11 
FRINT" ACLASSE VALEURS FROER XX TILDA FROEA " 


De DRINTS —N TT 


FRINT" I | | | | | 


4 PRINT" + ——+ — 


FRIHT" | | | | | | 
A ), Uouee.. 


Se PRINT"! | | 


à — — 
FRIHT" I | 


ET SR RP RE EE CS 


PRINT" | 
PRINT + —+ —— 
PRINT" | 
PRIT —+—+—— 
PRINT" | | 


RIT ++ 
97 PRINT" | 


be bé pa bébé bé jt 
Où C1 & Lili 


PRINT + ——— 

PRINT" | | | | 
FRIHT meme mec mt mms) UE 
PRINT" SOMMES 
FORI=1TONC 

COL=2 :LNE=Z+2%1 
GOSUB117:PRINTITAEC1802FMPRCMICI 2) TABC1S)FHPRCPXE LD) TABCE)FHPR 
GOSUE1 17 :PRINTTABC32)FHPR CPE I 2) té 
23=23+MICI D :24=24+PNC ID :2S=2S+P CL) 
FORT=1T0S@@ : HEXT 

38 HEXT 

193 LHE=22:COL=2:GOSUE 17: PRINT" A"TABC1GOFHPREZ3) TABCLE)FNPREZ4) 


Re 
se" 








GOTO1 13 RE 





PRINT'JE HE FEUX FAIRE CELA FOUR UNE LOI DE FLUS NTRBES2) _ 
PRINT"DE 9 CLASSES " FHPR£ 
PRIHTROS : 


GETA#: IFH#F=""THENI14 
IFA#="1{"THEHRUH 
PRINT" END 
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17 REM 
18 PRINT"a"; 
19 


6 
1 RETUREH 
2 REM EXPLICATION 


EM 
124 PRIHT" eTeTaTel" 


IFCOLS1THEHPRINTLEFT#$ECOLS, COL-1 5; 
IFLHES1THENPRIHTLEFTS#CLHES, LHE-12 ; 


. FRIHT" CE FROGRAMME PERMET DE CALCULER LA STA--TISTIQUE D'EVEMHEMENT 


126 PRINT" 1 LOI DE TYFE UNIFORME 


127 FÜRI=1TOSGGA:HEXT 





128 PRINT" AMMOULEZ VOUS UH EXEMPLE ASSUI " 


123 GETA#:IFHA$=""THENIZS 
136 IFA$="OU"THENISE 

131 RETURN | 

132 README.HC, LC 

133 FÜRI=1TO0S 

134 RERADMICISd.IHFi Ii 

135 SUPCI=IMHFÉ ILE 

156 HEXT 


137 PRINT'CETULDE L°UH ALTIMETRE 


LEE UE SMSRRRR CA FPT 
133 PRIHTNE" EXPERIENCES 
149 PRIHTNC" CLASSES 


141 FRIHTLC" LARGEUR LES CLASSES 


142 PRINT" 
143 FÜRI=1TONC 


144 PRINT"CLASSE "I"MESURE "MIC(13; 


145 PRINT" INFC"I"D"IMECI) 
146 FRIHT" 
147 HEXT 





148 FRIHT'UHE TOUCHE FOUR LANCER LE CALCUL" 


149 GETAS: IFA$=""THEN149 
158 FLG=1:PRINT "1": RETURN 
151 DATA4OG.8, 19 


152 DATHS1,E26,F2,56.66, 48,58, 58,51, 


Ce 


Adaptation à d’autres machines 


Le programme passe tel quel 
sur 64. Au contraire, pour Le VIC, 
toutes Les impressions seraient à 
changer à cause de La Largeur d'é- 
cran plus réduite. 


Pour L'ORIC, seuls posent pro- 
blème Les caractères mouvements de 
curseur incorporés un peu partout 
Clianesr- 0 és Se 45792 175: 815 
26, 57, 116, 118, 124, 128, 137 et 
150) (excusez Les oublis). 


Le coeur signifie vidage écran 
et il est à remplacer par CHRS$(12), 
Le S est à remplacer par CHR$(30), 

Le Q (->) par CHR$(10), Le | (<-) 
par CHR$(9). 


Le R qui signifie contraste 
inversé et Le trait qui signifie 
retour au contraste normal peuvent 
être omis. Les caractères graphi- 
ques qui permettent de former Le 
tableau (lignes 82 à 101) peuvent 
être simulés par = I et *. 
Maintenant, au prix d'une ré-écri- 
ture, Les positionnements peuvent 
être remplacé par des PLOT : COLS 
et LNE$ n'interviennent qu'en 119 
et 120. 


Dans L'ATARI, Les caractères 
CTRL mouvement de curseur peuvent 
être incorporés das une chaîne à 
condition de Les précéder de ESC, 
mais Là aussi, il est peut-être 


Es nant ni D 


SUIWANT "à 


21 


JO 


préférable d'utiliser POSITION. 
N'oubliez pas de dimensionner tou- 
tes Les variables chaînes de carac- 
tères. En 119 écrire : 


es.ssePRINT COL$S (1, COL-1) ; 
Même chose en 120. 


L'absence de DEFFN crée une 
difficulté. La Ligne 5 doit être 
supprimée et partout où FNPR est 
employée, remplacer par l'expres- 
sion explicite. Donc en 62, 63, 65, 
67, 69, 71, 104, 105, 109 écrire 
par exemple : 


62 PRINT ".... ALPHA=" ; INT CALPHA 
* 1000 + 0.5) / 1000 


104, 105 et 109 sont à 
réécrire car TAB n'existe pas: Le 
plus simple est d'imprimer une 
chaîne d'espaces entre guillemets 
et ajuster Les nombres d'espaces; 
EX 


105 GOSUB 117 : PRINT ” à 
; INT (PCI) - 1000 + 0.5)/1000 


La dernière difficulté vient 
des GET Lignes 76, 114, 129 et 149. 
Ici, il suffit de Les remplacer par 
INPUT. Cela imposera de terminer 
Les réponses par ‘RETURN" ce qui 
n'est pas gênant dans ce contexte. 


Pierre-Etienne THALBERG 





La connexion d'un magnéto or- 
dinaire devrait -sur Le papier- 
procurer une certaine économie par 
rapport au magnéto Commodore ou 
Atari. Oric a décidé d'office de 
faire appel à un magnéto ordinaire. 
La Commode a publié (dans Le numéro 
3, épuisé : photocopie possible 
pour nos abonnés, coût 18 francs) 
un schéma d'interface Commodore - 
magnéto ordinaire. 


Eh bien SEDERMI commercialise 
cette interface pour 120 F modèle 
A, et 170 F modèle B ( ce dernier 
modèle gère Le moteur ; il est for- 
tement conseillé pour Le 64 qui 
comme vous Le savez interrompt La 
lecture lorsqu'il vient de trouver 
Le nom de fichier: il ne faut pas 
que La bande défile pendant ce 
temps ). Vous pouvez commander par 
simple Lettre au 28 rue Vicq 
d'Azir. 


Mais l'utilisation d'un magné- 
to ordinaire pose quelques problè- 
mes pour trouver Le réglage opti- 
mum. En principe, il faut être près 
du maximum des aigus et de la 
puissance. 


Sur ORIC , mettez vous au maxi 


de puissance. Si Le système ne 
trouve pas de fichier, diminuez un 
peu . Si Le système trouve Le fi- 
chier mais ne charge pas convena- 
blement ( Le Listing se termine par 
une flopée de UUUU...) diminuez en- 
core un peu.. Si vous avez Le diag- 
nostic ‘“ Load Aborted ‘ ou ‘“Errors 
Found ‘", c'est que vous avez trop 
diminué. Maintenant, sur ATMOS, Le 
diagnostic ne prouve rien: vérifiez 
Le programme lui-même. 


Un bon magnéto 


Nous avons repéré un modèle de 
magnéto qui nous semble donner d' 
excellents résultats tant avec !l' 
ORIC qu'avec des Commodore ( via 
notre interface ). IL a même une 
fois pu Lire sur 64 un programme 
qui donnait LOAD ERROR avec le 
propre magnéto Commodore. Il s'agit 
- réclame non payée - du PHILIPS 
DATA RECORDER 6600/30P. Attention 
ne vous Laissez pas coller un 6600 
tout court. Le 30P est, manifeste- 
ment, spécialement conçu pour enre- 
gistrer des données. 


Jean RENAUD 
Pierre-Etienne THALBERG 


Le Common 





Chargement accéléré des programmes 
sur cassettes pour le VIC ou le C-64 


Une des raisons de La lenteur 
du chargement à partir des casset- 
tes est La répétition de cette opé- 
ration. La routine LOAD charge Le 
programme: une première fois puis 
compare ce qu'il y a maintenant en 
mémoire avec La seconde copie du 
programme sur La cassette . Si Les 
deux ne sont pas identiques, Le 
message ‘Load error" est généré. 
Le mieux est ici l'ennemi du bien 
car si La 1ère version est correcte 
et La seconde mauvaise, il y aura 
un ‘Load error" bien que Le pro- 
gramme en mémoire soit correct. On 
peut seulement Le Lister. Si on 
édite une Ligne ou si on fait RUN, 
Le système se plante aussitôt. 


La méthode suivante va vous permet- 
tre de ne charger que la première 
version et de La faire marcher. 
Vous pouvez ainsi récupérer quel- 
ques programmes réticents et sur- 
tout diviser Le temps de chargement 


par deux, ce qui est appréciable 
pour Le 64 et ses programmes 
marathons. 


Bon, mettez un programme quelconque 
et tapez LOAD suivi de Return. 
Lorsque vous pensez avoir dépassé 
La moitié du temps de chargement, 
pressez stop. Faites ensuite: 


POKE 45,PEEK(174) : 
:POKE 46,PEEK(175) :CLR 


et vous pouvez maintenant éditer ou 
exécuter votre programme. 


Pour vous aider à déterminer 
La moitié du chargement voici 
quelques trucs: 


après Le break, regardez PEEK(167); 
si c'est 2, c'est La première ver- 
sion et si c'est 1, c'est La secon- 


était en cours de 
Vous pouvez aussi dé- 
terminer votre éloignement par rap- 
port à La moitié en regardant Le 
pointeur (173,174). 


de version qui 
chargement. 


Soit PO = PEEK(173)+256xPEEK(174) 


sa valeur. 


Les adresses de début et de fin de 
votre programme sont respectivement 
DE = PEEK(193) + 256 x PEEK(194) et 
FI = PEEK(174) + 256 x PEEK(175). 


Lors du chargement de chaque ver- 
sion, PO parcourt l'intervalle 
entre DE et FI. 


optimiser votre chargement, 
repérez La valeur du compteur du 
magnétophone pour Lequel un break 
donne peek (167) = 1 et PO Le plus 
proche possible de DE (souvent 
2049). 


Pour 


Voilà c'est simple et çà marche. 





Sauvegarde sur disquettes 


- On connaît Le problème de La 
synchronisation entre Le 64 et son 
lecteur de disquette. C'est lL'uni- 


que raison pour laquelle l'unité 
1540 du VIC est incompatible avec 
Le 64. On peut cependant charger 


et sauver un programme en inhibant 
La gestion d'écran par un POKE 
53265,11 avant toute opération. Le 
problème n'est pas tout à fait ré- 
glé avec La 1541 car si des sprites 
sont actifs, il y a parfois des 
problèmes (1 fois sur 10 en moyen- 
ne). Donc éteignez Les tous par 
POKE 53269,0 auparavant. 


— Un problème plus grave est Le bug 
du DOS concernant La commande © 
(replace). De temps en temps, elle 


ee Pomme AL 
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fait n'importe quoi en remplaçant 
Le programme désiré, non par celui 
en mémoire, mais par un programme 
quelconque du répertoire. Résultat: 
vous n'avez plus aucune trace de 
votre programme! Ne l'utilisez 
jamais , sauf quand le programme 
remplaçant est de même Longueur 
exactement. Je dis cela pour ceux 
qui travaillent en FORTH et qui ne 
peuvent s'en passer. Là, il n'y a 
pas de problèmes. 


Sauvegarde d’un bloc 
en langage machine sans moniteur 


Soit à sauver Les octets compris 
entre Les adresses À et B avec 


A = LA+256%xHA et B = LB+256*HB 
SAVE "TITRE",1,1 (return puis 
stop) 

POKE 780, 253 

POKE 253,LA : POKE 254,HA 

POKE 781,LB+1 : POKE 782,HB 
SYS 62941 ($F5DD) 


Voir un traitement plus complet de 
ce problème dans l'article spécifi- 
que de ce numéro. 


Imprimer l’adresse de début 
d’un programme d’une disquette 


10 OPEN 1,8,2, "TITRE, P,R" 

20 GET 1, A$, B$ 

30 PRINT ASC € A$ + CHR$CO) ) + 
256*ASC ( B$ + CHR$(O) D: CLOSE 1 


Déplacer rapidement une zone 
mémoire vers une autre 


Le basic est trop lent pour cela. 
Par exemple si vous voulez recopier 


Le basic en RAM pour le modifier 
vous feriez: 


FOR I = 160%x156 TO 192x256: POKE I, 
PEEK (I): NEXT. 
Cela dure 40 secondes. 


On peut remplacer cela par: 


POKE 88,0 : POKE 89, 192 

POKE 90,0 : POKE 91, 192 

POKE 781, 32+1 (nombre de. pages à 
translater) 

SYS 41971 

même résultat 0,5 seconde après. 


Maintenant faites POKE 1, 54 et 
amusez vous. 


A quelle génération appartient 
votre C-64 ? 


- Allumez votre C-64 et passez en 
écriture noire (CTRL 0), effacez 
L'écran (SHIFT CLR) et faites POKE 
1600,1: 


si un À blanc apparait, il est 
de la 1ère génération 

Si rien n'apparait, il est de 
La 2ème génération 

Si un A noir apparait, il est 
de La 3ème génération. 


En effet, selon Le cas, La commande 
SHIFT CLR efface l'écran et initia- 
Lise La carte couleur($D800-) avec 
du blanc, La couleur du fond ou La 
couleur de l'écriture. 


Hervé LE MARCHAND. 
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Vous possédez un Commodore 64. Utilisez-le à fond. MICRO APPLICATION vous en donne 
maintenant la possibilité, grâce à sa gamme complète de programmes en français*. 


Créez : Développez : 


PAINTPIC : Un programme révolutionnaire  ZOOM PASCAL : Le langage le plus populaire 
pour dessiner, peindre et colorier à l'écran. après BASIC. Programmation structurée. 


Va au devant de votre imagination. Comprend un éditeur, compilateur et traducteur. 
Un logiciel indispensable à tous. TRI FORTH : Le langage du futur : 

SYNTHY 64 : Utilisez à fond les capacités développement efficace et rapide. 

musicales de votre ordinateur. ARROW : Le langage de la machine : 

Permet la composition et l'exécution de comprend un assembleur, un éditeur et un 
partitions musicales polyphoniques. accès cassette accéléré. 


Tous nos programmes en français existent 
sur disquette, cassette ou cartouche. 


Notre catalogue vous permettra d'en savoir plus sur les prix 
et les caractéristiques de tous nos programmes. 


MICRO APPLICATION 

147, avenue Paul Doumer 

92500 RUEIL MALMAISON FRANCE 

SOFTWARE Tél. (1) 732.92.54 . Telex MA 205 944 F * à partir de 95 FF TTC 
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Jouez : 


MICRO APPLICATION, c'est le logiciel au 
sérieux mais c'est aussi la détente. 

Des jeux pour se distraire. 

STAR CRASH, POKER, SKIER, POOL, TROBOTS, 
COSMIC SPLIT... 

…… êt pour réfléchir : 

DAEDALUS, SUPER DAEDALUS, LOGIK... 
MICRO APPLICATION : Une gamme de jeux 
pour réfléchir en s'amusant et s'amuser en 
réfléchissant. 


MM Le désire recevoir sans engagement le catalogue gratuit HR 
[re] de l’ensemble de vos programmes. E 
lei Nom — 
M access à [| 
ii RE 
El | 5 
EE C. Postal Ville … ’ e F 
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n° 5 de La Commode 

sous Le titre ‘Le 
Tampon Clavier'', démonté Le méca- 
nisme de La saisie simulée, bien 
connue des utilisateurs de modèles 
Commodore sous Le nom de clavier 
dynamique. 


Dans Le 
D.J. DAVID a, 


IL en a montré Les possibili- 
tés, notamment lL'auto-modification 
d'un programme par insertion auto- 
matique de Lignes. 





Peut-on arriver au même résul- 
tat. sur 'ORIC.?7 

Ce n'est pas à priori évident, 
pour deux raisons. 


La première est liée au prin- 
cipe même de Le saisie simulée. On 
génère par programme une Ligne 
d'instruction 8ASIC et on l'affiche 
sur L'écran. Sur Les Commodore ïl 
suffit alors d'amener Le curseur 
sur La dite Ligne et de faire 
RETURN pour qu'elle soit aussitôt 
et entièrement placée dans Le tam- 
pon d'entrée,puis exploitée. 


Pas question d'en faire autant 
sur L'ORIC. Son éditeur d'écran, 
très sommaire, oblige vous Le savez 
à repasser Laborïieusement Le cur- 
seur sous tous Les caractères avec 
CTRL-A, pour une prise en compte 
effective. IL est cependant assez 
facile de pallier ce point faible. 


La deuxième raison qui nous 
interdit une simulation automatique 
de saisie est due au fait que 
L'ORIC n'est pas pourvu d'un tampon 
clavier capable de stocker plu- 
sieurs octets. Donc impossible de 
mettre à l'avance par des POKE Les 
mouvements de curseur et Le RETURN 
servant précisemment à commander La 





saisie de La Ligne présente à l'é- 
cran. Il existe seulement une uni- 
que case mémoire (#2DF) appelée mé- 
moire clavier qui contient Le code 
ASCI1+128 de La dernière touche en- 
foncée. C'est maigre mais pas sans 
intérêt comme nous Le verrons. 





Supposons une Ligne BASIC af- 
fichée à un emplacement déterminé 
sur L'écran, tout en haut par exem- 
ple. L'adresse écran du premier ca- 
ractère est dans ce cas #BBAA. Rap- 
pelons au passage que cette ligne 
BASIC peut s'étendre en fait sur 
deux Lignes d'écran successives. 


Un petit programme, AUTOLM, de 
47 octets, Listing n° 1, va nous 
permettre de Lire Les codes des 
caractères de La Ligne sur l'écran, 
de Les transférer dans Le tampon 
d'entrée, d'en marquer La fin par 
un code 0, et puis d'appeler l'in- 
terpréteur BASIC après avoir mis 
Les pointeurs voulus sur l'adresse 
de début du tampon. Et Le tour est 
joué ! 

Deux cas alors se 
présenter: 


peuvent 


1. La Ligne commençait par un numé- 
ro. Elle est alors insérée dans Le 
programme BASIC existant éventuel. 


2. Les instructions n'étaient pas 
précédées d'un numéro. Elles sont 
alors purement et simplement exé- 
cutées, comme en mode direct. 


Si! Vous allez voir, cela peut 


aussi être très utile. 





La création de Lignes de DATAs 
est une application typique. Pour 
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peu qu'il soit nécessaire de mettre 
sous cette forme un nombre impor- 
tant de codes mémoire (redéfinition 
de caractères, programme en langage 
machine, ...),le gain de temps est 
important et surtout on élimine Les 
risques d'erreurs. 


AUTODATA, voir Listing n° 3, 
associé à AUTOLM ne permet pas une 
saisie 100% automatique en raison 
de l'absence de tampon clavier. 
Nous n'en sommes toutefois pas Loin 
puisqu'il suffit de maintenir un 
doigt sur RETURN pour déclencher La 
création d'une nouvelle Ligne, et 
ce à cadence élevée; guère plus 
d'une seconde par ligne ! 





- Les lecteurs disposant d'un moni- 
teur entreront directement Le pro- 
gramme en langage machine. Les au- 
tres utiliseront Le Listing 2 et 
une boucle classique de chargement: 
FOR 1=#490 TO #4BF: READ A 
: POKE I,A: NEXT 

L'adresse de début a été choi- 
sie pour permettre un groupement 
avec La routine APPEND, décrite 
dans ce numéro, mais elle peut être 
différente, Le programme étant re- 
logeable. 


- La Ligne O d'AUTODATA est très 
importante. C'est dans celle-ci que 
seront stockés Les trois paramè- 
tres: adresse de début, incrément 
et n de Ligne utilisés à chaque 
nouvel appel. On sait en effet que 
La création- ou La modification- 
d'une Ligne, entraine La perte de 
toutes Les variables. 


Attention ! IL y a un espace entre 
DATA et Le premier zéro. 


- Si vous avez ajouté AUTODATA à un 
programme existant, il faut une Li- 
gne supplémentaire: 

. 1 GOTO 60000 


- IL est prévu 8 DATAs par Ligne 
créée. Vous pouvez aller jusqu'à 16 
(avec 3 chiffres écran). Pour cela 
modifiez Le début des lignes sui- 
vantes: 
60025 FOR J=D TO D+15: .... 
60030 D=D+16: .... 


- En 60040, juste avant l'appel du 
sous-programme en LM, on remarquera 
Le forçage en #2DF, embryon de tam- 
pon clavier, du code 161 (128+33), 
c'est à dire de ‘!". C'est l'astuce 
qui permet de relancer Le programme 
par un simple appui sur RETURN, 
l'adresse affectée à La fonction ! 
étant #C98D, celle de RUN. 


- La sortie se fait par CTRL-C. En 
cas de reprise remettre si néces- 
saire Les trois DATA de La première 
Ligne à zéro. 





IL y a Là beaucoup plus d'applica- 
tions envisageables qu'il n'y pa- 
raît. On peut par exemple en cours 
d'exécution d'un programme saisir 
une expression mathématique qui se- 
ra évaluée (simulation de La fonc- 
tion EVAL de certains BASIC sophis- 
tiqués). 


Application plus simple, mais 
bien utile, l'examen de variables 
ou du contenu d'adresses mémoire, 
Lors de La mise au point d'un pro- 
gramme. Normalement il faut à cha- 
que fois taper une Ligne d'instruc- 
tions adéquates. C'est vite fasti- 
dieux. Voici mieux si vous avez 
chargé AUTOLM, Listing 1, avec com- 
me adresse de début de Ligne à Lire 
#BF92 (POKE #491,146 
: POKE #495,191): 


- Réservez Les deux lignes en 
bas d'écran par POKE 623,25. La 
première commence précisément en 
#BF92. 


“ Placez par: PLOT 7,25," se" 
et si nécessaire par PLOT 1,26,"... 
.. vos instructions dans ces lLi- 
gnes. Vous vourrez Les modifier par 
La suite à votre gré. 


- N'oubliez pas de terminer 
par ‘“\" (barre oblique inversée). 
Ce n'est pas strictement indis- 
pensable, mais pratiquement né- 
cessaire. 


- Pour terminer: 
DOKE #2F5,#490 
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Et maintenant il vous suffi- 
ra, soit de mettre aux endroits 
voulus de votre programme L'ins- 
truction ‘'!",} soit après un arrêt 
de taper ! <RETURN>, pour obtenir 
l'affichage désiré ou encore La 
reprise de l'exécution avec des 
paramètres définis. 


Exemples: 


?CHRS(30) ;A;B%,CS\ 

FORI==XXX TO YYY:?2PEEK(I);:NEXT\ 
A=3:X=P1/2:GOT01250\ 

etc..., toutes Les instructions 
BASIC étant permises. 


IL est même possible de boucler, 
mais pas indéfiniment, en terminant 
par ...21x, 





La simulation de saisie offre 
d'intéressantes possibilités, Loin 


€ 


1 499-4BF 

8490: A9 AA LDA #H$AA 
0492: 85 @@ STA $@0 
@494: A9 BB LDA #$BB 
8496: 85 @1 STA $@1 
8498:  AQ 8e LDY #$20 
2494: A2 @8 LDX #$20 
@49C:  B1 @@ LDA ($29),Y 
Q4SE : Ca:-5C ; CMP H#$SC 
B4ABG: F@ QE BEQ $24B@ 
84A2: 95 36 STA $36,X 
O4ñ4: EB INX 

B4AS5: C8 INY 

B4A6:  C@ 26 CPY #$26 
24R8:  DQ 02 BNE $24AC 
Q4AA: C8 INY 

B4AB: C8 INY 

B4AC:  C@ 4D CPY #$4D 
@4AE:  D@ EC BNE $249C 
24B@: A9 @@ LDA #$00 
04B2: 95 36 STA 336, X 
@4B4: A9 35 LDA #$35 
04B6: 85: E9 STA $E9 
04B8: A9 20 LDA #$20 
@4BA: 85 EA STA $EA 
DABC0. AC: Ali sldis cJNE CAD 
@4BF: 2e BRK 


d'être Limitées aux exemples dé- 
crutss 


Et comme rien ne vaut un exer- 
cice pratique pour bien assimiler 
un concept, nous vous proposons de 
résoudre pour L'ORIC Le dernier cas 
traité dans l'article de DJD: en- 
trée en cours de programme de la 
definition d'une fonction DEFFN..., 
qui sera placée dans une ligne 
d'instruction. À vous de jouer ! 


Jean RENAUD 





à La fin 4C C1 C4 CJMP 
C4C1) au Lieu de 4C D1 C4 


Listing 1 





Listing 2: dernière Ligne: 
150 DATA 169,0,133,234,76,193,196,0 


Listing 3: Ligne 60050 : 
OUDSD TR sous :DOKE #2F5,#C9BD 


adresse début Ligne 
à Lire mise en 0,1 


lecture ligne 
"\"? (fin de ligne) 


entrée dans tampon 


38 car. ? (1ère ligne) 


on saute Les 2 colonnes 
de gauche 


77-2 car. ? 


code 0 en fin d'entrée 


adresse tampon 
dans pointeurs 


--> BASIC 


(CHARGET) Listing 1 


We Pnenstle n° 77 


100 DATA 169,170,133,0,169,187,133,1 

110 DATA 160,0,162,0,177,0,201,92 

120 DATA 240,14,149,54,232, 200, 192,38 
130 DATA 208,2,200,200,192,77,208, 236 
140 DATA 169,0,149,54,169, 53,133, 233 
150 DATA 169,0,133,234,76,209,196,0 


@ DATA 00800,00,00000 
10 

208 

60800 REM AUTODATA 


60018 READ D,1,L:IFD+I+L=@THENGOSUB60050 


6@02@ PRINTCHR$C32)MID$SCSTR$SC(L),2)" DATA 
3 

60825 FORJ=DTOD+7 :PRINTMID$CSTR$(PEEK(J) 

), 2)CHR$ (44) ; :NEXT :PRINTCHR$CS)"X" 

60030 D=D+8 :L=L+] :POKE616, 3 :PRINT :PRINT”" 

Adresse debut ligne suivante: "D; 

680049 GOSUB60090 :POKEH2DF, 161 :CALLH490Q 

6005@ PAPERG : INK2 :CLS :POKE#HBC21, 3 :DOKE#2 

F5, HC98D 


60060 FORJ=1T08 :PRINT :NEXT:INPUT"Adresse 


decimale de debut ";D 

6087@ PRINT:INPUT'Numero de lere ligne D 
AITIAT SL 

6008@ PRINT:INPUT'"'Increment numeros de 
ignes ";jl 

68092 N$=RIGHT$C"Q"+MIDS(STRS(I),2),2):M 
=H5QC : GOSUB60 120 
680108 N$=RIGHT$("2000"+MIDS(STR$(D),2),5 
) :M=#506 : GOSUB6012@ 
60112 N$=RIGHT$("0000"+MIDSCSTR$S(L),2),5 
):M=H#50F 
60120 FORJ=1TOLENCNS) :POKEM+J, ASCCMIDS$CN 
$, J, 1)):NEXT :RETURN 


Lomme AUS 


Listing 2 


Listing 3 
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Nous avons montré (dans La 
Commode n° #4) comment Le tampon 
clavier permettait aux Commodore de 
simuler des frappes clavier par 
programme. Un article de ce numéro 
montre comment faire sur ORIC. Cet 
article doit permettre à nos amis 
Ataristes de ne pas être en reste. 


Supposons que nous ayons à si- 
muler La frappe de quelques lignes 
(par exemple des lignes de program- 
me à ajouter). Il faut obéir aux 
étapes suivantes: 

1- vider l'écran (par ?"ctrl clear" 
ou ?CHR$(125) 


2— taper Les lignes voulues vers Le 
milieu de L'écran, disons entre Les 


Lignes (d'écran) L1 et L2. Les 
Lignes BASIC doivent avoir Leurs 
n en tête. 


3- faire POSITION 0,0:POKE 842,13 
(met en marche Le mode RETURN auto- 
matique) 


&- faire POSITION 2,L3:PRINT ‘CONT" 
EL Tout LS > Le. 


5- faire POSITION 2,L0:STOP 
IL faut LO > L1 


6- POKE 842,12 remet en mode nor- 
mal. 
Faites tourner l'exemple ci- 


dessous: 


19 ? CHR$C125) 
15 POSITION 2,19 


20 ? "19007?7x" 
20e, "11877" 
48 ©? "12072" 


59 POSITION 2,@:POCKE 842,13 
DEL POSITION 2,194? "CONT” 
79 POSITION 2,5:STOP 

82 POKE 842,12 


En faisant LIST après l'exécu- 


tion vous verrez qu'il contient 
maintenant Les Lignes 100, 110 et 
120 (ce qui explique Les trois 0 


imprimés). 





Une première 
de supprimer toutes Les Lignes dans 
un intervalle: il suffit d'imprimer 
Les numéros de ligne. Le programme 
ci-dessous supprime Les Lignes de 
numéros compris entre Les Limites 
spécifiées. 


application est 


19 ? "GEB,FIN";:INPUT D,F 

29 FOR I=D TO F STEP 29 

30 ? CHR$(125) :POSITION 2,3 
35 K9=F-I:IF K9)>19 THEN K9=19 
40. FOR J=Q TO K9:7? I+J:NEXT J 
58 POSITION 9,9:PCKE 842,13 
68 POSITION 2,23:? “CONT" 

7@ POSITICN 2,@:STOP 

80 POKE 842,12 

98 NEXT I 


Les autres applications possi- 
bles consistent à fabriquer Les Li- 
gnes de DATA correspondant à une 
routine en langage machine ou à 
entrer une fonction sur Le moment 
pour l'intégrer ou tracer sa courbe 
représentative. Voici un programme 
d'intégration général. 


s 


Rita A. 
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19 ? “DONNEZ LA FONCTION À INTEGRER SOUS 
LA FCRME Y=FCX)" 

20 DIM F$C32) 

30 INPUT F$ 

49 ? CHR$(125) :POSITION 2,19 

5Q ? "10CC";F$ 


6Q POSITION*G,8:POKE 842,13 149 X=B:GOSUB 1208:S=(S+Y)/2 
78 FOSITION 2,15:?7 "CONT" 150 FOR X=A+H TC B STEP H 

80 POSITION 2,5:STOP 16Q GOSUB 1908:S=S+Y:NEXT X 
39 POKE 842,12:? CHR$C125) 1/9 S=HXS 

100 ? "BORNES,NB DE PAS" 188 ? "INTEGRALE = ";S 

119 INPUT À,B,N 13@ END 

129 H=CB-AJ/N 10086 Y=3XxSINCX) 

1359 X=A:GOSUB 1808 :S=Y 121@ RETURN 


Au catalogue : 





UTIL-VIC-KIT de H. LE MARCHAND, un programme qui ajoute des fonctions au BASIC 
de votre VIC: 
SET (établit Les couleurs écran et cadre) CLEAN (vide L'écran) 
PLOT (trace un point en haute résolution) JOYO (Lit Les JOYSTICKS) 
LOOK (recherche une chaîne) KEY (affecte une touche de fonction) 
PAUSE et bien d'autres. 
En bref, un résumé de Programmer's Aid et Super Expander pour 80 F. 


ASSEMBLEUR UNIVERSEL de J. RENAUD 
Un éditeur-assembleur complet. Traitement des opérantes symboliques, 
sauvegarde de votre texte sur disque ou cassette. 
Pour tous Les COMMODORE (VIC à partir de 16 K) et ORIC; ATARI en préparation 
prix : 180 F. (+30 F sur disquette) (+50 F version compilée sur 64) 


BASICOIS de.H. LE MARCHAND, (pour VIC de base ou étendu) 
Si l'anglais est un obstacle à votre compréhension de L'informatique, 
BASICOIS est fait pour vous. Prix 150 F. 
MOTS CLES : ABS, ET, CODE, ATN, CARS, FERME, EFF, CMD, CONT, COS, 
DONNEES, DEF, DIM, EXP, SI, DEMANDE, ENT, FN, POUR, LBR, FRAPPE, APPEL, VA- 
AU, GAUS, LONG, SOIT, VOIR, RAPPEL, LOG, MIS, VIDE, REPETE, NON, SUR, 
OUVRE, OU, MEM, METS, POS, AFFICHE, LIS, REM, REPRENDS, RETOUR, DROITES, 
ALE, FAIS, RANGE, SGN, SIN, EXP, RON, PAS, HALTE, SEQ$, SYS, TAB, TAN, 
ALORS, JUSQUE, USR, VAL, VERIFIE, ATTEND . 


TELECRAN de D.J,. DAVID 
(Pour VIC, 64, ATARI; ORIC en préparation) 
Le jeu bien connu de TELECRAN, mais Là, Le trait peut être interrompu et 
il y a des traits diagonaux. Votre dessin peut être sauvegardé sur disque 
ou sur cassette. Prix : 80 F.(+50 F version compilee 64). 


SUPER-COMBAT de J.P. MORARD 
(pour VIC de base) 
Un jeu d'envahisseurs très rapide bien qu'en Basic. Rien que L'examen du 
Listing est très instructif. Prix : 80 F. 


8064 de D.J. DAVID 


Gestion d'une base de données sur VIC ou 64 équipé de sa 1541. 
Prix: 290F (disquette seulement). 
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Le sauvegarde et Le chargement 
d'une zone mémoire dont on donne 
Les adresses extrèmes est une chose 
évidente sur ORIC où il suffit de 
faire un 


CSAVE, A début, E fin 


Ceci est utile pour sauvegar- 
der un programme en Langage machi- 
ne, une table ou un dessin sur 
écran. 

Sur COMMODORE ou ATARI, on a 
toujours La possibilité de stocker 
chaque octet de La zone en tant que 
donnée : 





Ce qui 


est ennuyeux avec ce 
procédé, c'est qu'on obtient un 
fichier beaucoup plus Long à Lire 
qu'un fichier programme. Sur 
COMMODORE, nous savons constituer 
un fichier programme. Nos investi- 
gations se poursuivent sur'ATARI et 
nous ne manquerons pas de faire 
part de Leur résultat aux Lecteurs 
de La Commode. 


SAUVEGARDE D'’UNE TABLE 
EN FICHIER PROGRAMME 
SUR COMMODORE 


L'avantage de cette méthode 
est que Le fichier est rechargable 
par un simple LOAD Basic : 

LOAD ‘nom, 8 ou 1,1 (Le ,1 final 





est indispensable !) 


Comme pour La musique, il y a 
en fait deux méthodes, La bonne et 
La mauvaise. 


Commençons par La mauvaise. 
Nous La citons parce qu'elle est 
instructive et aussi pour qu'il n'y 
ait pas que de bonnes choses dans 
La Commode : cela finit par faire 
de La concurrence déloyale aux 
autres revues ! 

La technique consiste à em- 
ployer Le SAVE de Basic. Oui, mais 
il faut lui fournir Les adresses de 
début et de fin. Pas difficile ! On 
met Les adresses dans Les pointeurs 
début et fin Basic et Le système 
croit qu'il sauve un programme: 





avec DB = adresse de début basse, 
FH = adresse de fin haute, 
P=1 ou 8 

En quoi cette méthode est-elle 
mauvaise ? 


Eh bien, c'est qu'elle détruit 


Les pointeurs fondamentaux de 
BASIC. Donc, si l'opération est 
faite depuis un programme Basic, 
Les pointeurs doivent être sauve- 
gardés - attention, pas dans des 
variables : dans des cases mémoire 
tranquilles, car les variables sont 
détruites - et restaurés. Quant au 
pendant de La méthode, Le LOAD, il 
ne peut être employé à l'intérieur 
d'un programme Basic puisqu'après, 
Le système donne Le contrôle à un 
programme Basic qu'il croit commen- 
cer à des adresses fausses. 


LA BONNE METHODE 


Elle consiste à utiliser La 
routine du noyau du système d'ex- 
ploïitation (Le ‘'KERNAL") qui fait 
la sauvegarde. Elle est en $SFFD8. 
Elle s'utilise comme suit : 
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= mettre aux adresses ZZ et ZZ+1 de 
La page zéro l'adresse de début de 
5 zone à sauver. Charger A avec 
ZZ. 

— mettre en X (partie basse) et Y 
(partie haute) l'adresse de fin de 
La zone (en fait, l'adresse +1, 
comme d'habitude). 


- appeler $SFFD8 : donc 





Mais auparavant, il faut avoir 
appelé Les routines préparatoires 
SFFBA et S$FFBD qui préparent Le 
fichier logique et son nom : 





Si L'on effectue cette opéra- 
tion depuis l'intérieur d'un pro- 
gramme BASIC, cette dernière sé- 
quence peut être remplacée par une 
instruction OPEN: 


OPEN 1, U, X, F$ où U = 1 ou 8 ; 

X = O0 pour chargement, 1 pour 

sauvegarde et F$ est Le nom du 

fichier. 

On fait ensuite SYS adresse de 
SAUV puis CLOSE 1. 

De même pour Le chargement, on 
appelle La routine SFFD5 ce qui ne 
dérange pas Les pointeurs BASIC. 
Elle s'appelle comme suit : 

- mettre en À : O pour un charge- 
ment, 1 pour une vérification 

- si Le fichier est ouvert avec 
l'adresse secondaire 0, 1 ou 2, Le 
contenu de X et Y est indifférent : 
Le chargement se fera à l'adresse 
lue sur Le fichier. Si l'adresse 
secondaire est 3, Le chargement se 
fait à l'adresse spécifiée par X 





(partie basse) et Y (partie haute). 
- appeler $FFD5 donc : 
CHARG LDA %#0 

LDX  %£< début 

LDY # > début 

JSR SFFDS ; charge 


Bien sûr, cela doit être pre- 
cédé par une séquence PREP comme 
ci-dessus, mais en cas d'appel par 
BASIC il suffit de La remplacer par 
un OPEN. 

Dans Le programme ci-dessous, 
on charge Les séquences SAUV et 
CHARG en 32768 et suivantes (cas 
d'un 64, mais l'adaptation au VIC 
est facile) par des DATA. En 500, 
sauvegarde, en 600 chargement. 


400 FOR I = © TO 19 : READ À 
POKE 32768 + I,A = NEXT 
RETURN 

410 DATA 169, 251, 166, 254, 164, 
255, 32, 216, 255, 9% 

420 DATA 169,0, 166, 254, 164, 255 
32, 213, 255, 9% 

500 INPUT "'CASS (C) OÙ DISQ (D), 
NOM"; CS, FS : U = 

510 IF C$= "D" THEN U = 
10" + F$ 

520 OPEN 1, U, 1, F$ 

530 INPUT "DEBUT, FIN"; D, F 

540 DH = INT (D/256) : 

DB = D - 256*DH 

550 FH = INT (F/256) : 
FB = F - 256*FH 

560 POKE 251, DB : POKE 252, DH : 
POKE 254,FB : POKE 255,FH 

570 SYS 32768 : CLOSE 1 : RETURN 

600 INPUT "CASS (L) OÙ DISQ (D), 
NOM"; C$, F$ : U=1 

610 IF C$ = "D" THEN ÙÜ = 8 : 

F$:= "0-5. "4+FS 
620 OPEN 1, U, O, F$ 
630 SYS 32778 : CLOSE 1 : RETURN 


1 
8 : F$ = 


ADAPTATION 


Les routines sont valables 
pour VIC et 64. Pour Les autres 
CBM, il faut mettre La longueur du 
nom, Le n logique, l'adresse se- 
condaire, Le n de périphérique 
en $D1, D2, D3, D4; l'adresse du 
nom en $DA,DB, l'adresse de début 
en S$FB,FC, l'adresse de fin en 
$C9,CA et faire JRS S$F6A4 (BASIC 
4.0 : SF6E3). 

Pour Le chargement, c'est JSR 
$F322 (BASIC 4.0 : $F356). 


Daniel-Jean DAVID 
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Incroyable ! Le schéma de cordon Péritel que nous avions donné dans notre 


n° 8 (hélas épuisé - que de demandes nous avons eues !), eh bien il est 
valable aussi pour Les ATARI XL. (N.B.: ceci est valable pour Les 64 et Les 


ATARI PAL). 


Voici donc ce schéma. La connexion de La pile 9V n'est nécessaire que si 
votre télé n'a pas de position ‘vidéo commandée depuis Le tableau de bord. Si 
votre télé est seulement SECAM vous aurez une image en noir et blanc. 





Les autre signaux (1 et 5) ne sont pas compatibles entre Atari et 64. Les 
nouveaux 64, notamment Le SX ont une prise DIN 8 broches mais La prise mâle 
DIN S broches y entre et elle est compatible. Voici Les brochages: 


DIN 5 br 7 6. br 64 Atari 
1 Lumin / sync luminance 
2 masse masse 
3 sortie son sortie son 
4 vidéo composite vidéo composite 
5 entrée son chroma 
6 chroma n.â. 
td nec: n'as 
8 ne Cr n.a. 


Pierre Etienne THALBERG 
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L'incompatibilité du ‘micro- 
disk'' avec Les cassettes n'est pas 
son moindre défaut. Comment étendre 
aux logiciels que vous avez dans 
votre cassettothèque Les avantages 
du chargement plus rapide (Cet plus 
fiable) des disquettes ? 


Eh bien il y a une manip à 
faire. Pas très simple mais pas 
trop difficile tout de même. Suivez 
La exactement. 


A- Chargez Le SED (Système d'Ex- 

‘ploitation Disque), donc opération 
habituelle: connectez l'unité de 
disque et l'Oric, mettez sous ten- 
sion, appuyez sur le RESET rouge de 
l'unité de disque et introduisez La 
disquette. 


2 Vous devez avoir Ready et Le 
curseur. Tapez CALL #E6CA CATMOS : 
#E76A) 


3- Débranchez La disquette en ti- 
rant d'un coup sec Le connecteur 
câble plat derrière l'Oric. Atten- 
tion, ne mettre hors tension ni La 
disquette ni l'unité centrale. 


&- Vous n'avez plus Le curseur. 
Rétablissez-le en faisant RESET 
(c'est Le faux RESET) en dessous de 


l'unité centrale. Branchez Le ma- 
gnéto. Chargez Le programme voulu 
par Le CLOAD convenable. 


5- Tapez à nouveau CALL #E6CA 
CATMOS: #E76A). Débranchez Le ma- 
gnéto (en fait, ce débranchement 
est facultatif). 


6- Avec précautions, mais fermeté, 
remettez Le connecteur câble plat 
de La disquètte à l'arrière de 
L'ORIC. 

Faites à nouveau un ‘'faux'' RESET: 
bouton caché en dessous de l'unité 
centrale. SURTOUT_ PAS Le bouton 
rouge de l'unité de disques. 


7- Vous êtes prêt maintenant à 
sauver Le programme sur disque par 
ISAVE ‘'nom''. 


Et voilà! Cette procédure est 
à suivre exactement. Il n'y a ja- 
mais à mettre hors tension ni l'u- 
nité centrale ni Le microdisque. IL 
n'y a qu'un RESET rouge à l'étape 
1. Sinon, aux étapes 4 et 6, c'est 
Le RESET en dessous de l'unité cen- 
trale. 


Emmanuel PUCEVEND 
et Honoric de BALSA 





Les seuls numéros anciens restant disponibles sont les 1, 9et 10. Dépêchez-vous delescommander. 
BON DE COMMANDE 
à envoyer à La Commode 28, rue Vicq d'Azir — 75010 Paris 
Je désire les numéros suivants de La Commode ...........,..4,,,,,4,4,4,,,,44,,4,44.44 a, 


NOM EE LEE re Re Ven EE EL me eu Règlement 45 F par n° joint e 
RON best Mine dut dt 0 de O CCP O CB [] MANDAT 
ESA RUE RER sc atasdrtne Rte ne Signature 
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19 POKES6, 24: POKES4, 24: 1=34816 
28 FOR J=6144 TO 7167 
? 39 POKE J,PEEK(I):I=1+1 

4@ HEXT J:PRINT "9" :POKEESES, 25 
52 DIN AC127) 
ED FOR 1=9 TO 127 
FA RERD ASIDd FOKHE 6392+1,A{1) 
59 HEXT I 
1349 DATA 48,24,56,4,69,68,59,09 
1919 DATA 24,36:56.:4,69.68,58.09 
1929 DATA 35,99,56,4,69,63,55,02 
1939 DATA 12,24,60,66,126,64.€û,00 
1449 DATA 48,24.59,66, 126,64,5A. An @ 

LE à 1959 DATA 24.36.60, 66. 126, 64. €0. 00 
196 DATA 36.049,60 ,66, 126, 64, ED. 49 
1979 DATA 24,36,24,8,9.9,29,0û 
1959 DATA 29,20,24,8,6, 3,28, DA 
1934 DATA 24.25.00, 60.66. 60.6. 40 
1199 DATA 26.:09.60,66,66.26.€0; 00 
1119 DATA 24,36, 10,66, 56; rA,: 58,09 
1120 DATA 26.090.66,66,66, r D. 29.nû 
1139 DATA A8.00,60.66,64,60,8, 24 
1149 DATA 99.94.62.85.65:09: 62; 90 
1159 DATA 99,08, 124,130,254, 128, 124,08 


Q 
Q 


Mode d'emploi lui, mobilise à peine plus d'1Kk 
octet. Il reste, en effet, 2181 

Rentrez Le programme et exécu- octets sur un VIC sans extension. 

tez-le: Le VIC passe en mode texte. Les différents caractères dispo- 

Vous pouvez maintenant effacer Le nibles sont : 

‘programme par NEW et travailler 

avec votre VIC comme d'habitude. N.B. C= N signifie La touche 

Veillez simplement à rester en mode ""COMMODORE'"" puis La touche ‘'N' 

texte. Le générateur de caractères 

que Le programme a placé en mémoire C=N: C= R : 3 

vive contient Les caractères spé- C= Q : ä C= W : Ô 

ciaux utilisés dans notre langue. C= D : a C= H : 0 

Les caractères alphanumériques ha- = Z:é C= J : à 

bituels sont inchangés. Seuls quel- = See mL EU 

ques caractères graphiques obtenus C= P : ê sAY is, C 

par La touche “C=" sont remplacés =A:e =V:0 hi 2 

par ces caractères spéciaux. Vos C= E : C= 0 : e J ensem- 

commentaires n'ont-ils pas meilleu- ble formant Le oe 

re allure ainsi ? Le programme tel 

qu'il est est sans doute perfecti- Nota : ces nouveaux caractères ne 

ble, mais il a l'avantage de ne sont pas compris par l'interpré- 

consommer aucune place mémoire teur. . 

puisque L'on peut l'effacer. Le 

générateur de caractères, quant à Sébastien ANDALORO 


ones 





un même court programme 
- fictif - avec sa Liste telle qu' 
elle apparaît normalement à l'écran 
et telle qu'elle devient après Le 


Voici 


traitement proposé. Sans commen- 
taires ! Et La place occupée en mé- 
moire est rigoureusement La même. 


” 1000 REM *%* DEMO X% 

1910 REMX 

1029 PRINT'PROGRAMME FICTIF" 

1925 REMX 

1030 REM *% CALCUL DE LA UITESSE * 
1035 REMX 

1848 A=SGR(PI)/1,234 

1945 PRINTA,AXA 

1058 END 


* DEMO * 
1920 PRINT'PROGRAMME FICTIF" 
* CALCUL DE LA VITESSE * 


1848 A=SGR(PI)/1.234 
1245 PRINTA, AXA 
195Q END 


La transformation est basée 
sur l'exploitation de La méthode de 
stockage des programmes dans La mé- 
moire de L'ORIC, décrite dans Le 
numéro précédent, page 36. 


Comment faire 7? C'est très 
simple : ajoutez à votre programme 
Les Lignes suivantes que vous dé- 
truirez ou non après avoir fait 
RUN 60000 


60000 IF PEEKCH5@5)=157 THEN POKEK596, 14 
68019 D=DEEKCHS5@1) 
60020 REPEAT 
60030 IF PEEKCD+4)=157 THEN POKE D+S,14 
60048 D=DEEKCD) 
60058 UNTIL D=Q 

St-on a Lu = et assimilé - 
l'article précité, Le mystère est 
vite levé. On regarde à chaque li- 
gne si Le cinquième octet a pour 
valeur 157 - code de REM -. Si oui, 
L'octet suivant est remplacé par 
14, code d'effacement de la ligne 


sur laquelle se trouve Le curseur. 
De ce fait, Le numéro de ligne et 
Le mot REM n'apparaîssent pas au 
Listage. 


Si REM est seulement suivi 
d'un unique caractère — x par ex. — 
on a alors une ligne vide, d'espa- 
cement. 


Et aucune perturbation n'est 


apportée au bon déroulement du pro- 
gramme par ce tour de passe-passe. 


Quant à l'impression de La 
Liste, elle se fait normalement, 
tout au moins sur La MCP 40- 4 cou- 
Leurs. Par contre, sur Les GP 50, 
80 ou 100 Le code 14 est celui qui 
fait imprimer en double largeur. Il 
faut donc L'éliminer. Heureusement, 
on retrouve La Liste d'origine avec 
Le même sous-programme dans Lequel 
en fin des Lignes 60000 et 60030 on 
remplace 14 par 42 par ex. (42 = 
code de *) 


Les perfectionnistes pourront 
faire mieux encore avec à l'ecran 
des remarques d'une couleur diffé- 
rente, donc se détachant encore 
plus. 


IL faut alors modifier Les 3 
octets qui suivent REM, avec dans 
l'ordre, 14 (comme ci-dessus), 27 
(ESCAPE), xx (code ASCII d'une lLet- 
tre : À = rouge, par ex.) : 

POKE “D «+. 5,14 : POKE.D + 6,27 : 
POKE D + 7,xx 


Enfin, il est naturellement 
possible, toujours sur Le même 
principe, de faire disparaître au 
Listage tout ou partie de certaines 
Lignes, histoire de rendre ses pro- 
grammes moins accessibles. D'autres 
codes que 14, 12 et 30 peuvent être 
aussi utilisés. 


Jean RENAUD 
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Les deux articles qui suivent, 


dans des registres différents, 
illustrent deux possibilités de 
contrôle de l'instruction DATA du 
3ASIC. 


Chacun des deux utilise un 
pointeur différent: il n'y en a que 
deux. 


Dans Le programme du docteur 
Jacques SAGLIER, Le pointeur du 
n° de Ligne de DATA en cours (a- 
dresse décimale 63-64 ; CBM64: même 
adresse; CBM: 60-61; ORIC: 174-175) 
est utilisé pour contrôler Le volu- 
me du prélude n° 1 joué par ce 
programme. Ceci est réalisé entre 
autre par La ligne 152 qui utilise 
une propriété classique du BASIC 
qui permet d'utiliser une expres- 
sion logique comme opérande d'une 





19 :REM:'PRELUDE:J.SAGLIER 1983 


opération arithmétique : -1 est La 
valeur arithmétique de "vrai", et 0 
celle de "faux". IL est bien sûr 
possible de réaliser ce contrôle, 
fonction de La position de l'inter- 
prétation dans La ‘partition, par 
d'autres moyens, cependant ce pro- 
gramme permet de bien voir comment 
Le contrôle d'avancement des DATA 
peut être fait à l'aide de ce pre- 
mier pointeur. < 


Dans l'article de Bernard 
PETRISOT, c'est Le pointeur de l'a- 
dresse en cours des DATA - et non 
Le n° de ligne du programme — qui 
est utilisé et manipulé. IL s'agit 
en fait de ‘'gammes'"' (restons dans 
La musique) autour de La manipu- 
lation de ce pointeur. 


Daniel TRECOURT 


2Q PRIHNT'CMMMBFRELUTE EN UT MAJEUR" 


25 PRINT"'#M UUNFREMIER LIVRE DL 
39 FRINT'"'AMETEENBBMRBMIS JT. S. BACH)" 


32 
35 :REM:IHITIALISATIONS 
36 : 

37 


192 K=Q'L=D'LI=9:DIMA(Z) 
195 : 

196 à 
112 : 

113 : 

114 : 


100 V=36878 : 51=4-4 : G2=4y-3: S9=4-2 


M'PRINT'AMRM/IC 29 BIEN TEMPERE" 


G=0 :M=Q: T=100: 1=0:J=0:"V=6 
119 LDEFFHF(I)=256MPEEK(I1)+PEEK( 1-1) 


159 LD=FHFC643:REMX POINTEUR LIGNE TIATA 


152 Vy=-CEMCLDCSSS53+1246L02540) +64 LD2558) +154 LD=26500 5 


155 REAIIG:IFG=-1THEN350 
169 READM 


SE 


Le Comes no 


pnnnnmn 
© NU MM 


FÜRJ=OTOR : RERDA JD :MEXT 
FORI»1T02 
POKEY , YV':PCKES1,6G 
FORJ=1TOT:MEXTJ'POKES1,9 
POKES2 , M 
:FORJ=1TOT':MEXTJI:POKES2, Q 
‘FORJ=1TO2 
: : FORKS9TOZ 
‘ : : FOKES3, AK) 

: : FÜRL&=1TOT :MEXTL 
‘2: POKESS3 , 9 
‘ :MEXTK 
:MEXTJ 
:FOKEY , 9 


NEXTI 
GOTO158 | 
POKEY, 15:FORI=1T0Z 
:POKES1 ; 128: FORK=1TOT:HEXT 
:POKES1 , 9: FPOKES2, 129: FORK=1TOT:HEXTK 
:POKESZ , à 
:FORJ=1T014 
: : READK : POKES2, K: FORK=1TOT : NEXTK 
::TaT+2:MEXTJ 
HEXTI 
RERDG. M, K:POKES1,G:POKES2, M:POKES3.K 
Re INENT 
FORI=1STOASTEP-. 85: POKEY, L':MEXT 


‘ END 

DATA 222,202,211,222,22 2793 DATA 202,156.176,199.295 
DATA 222,196:216:225, 230 289 DATA 136,156.176,18S3,205 
DATA 229,196.211,225,230 583 DATA 166,137,166, 125,223 
LIATA re 211,222,229 390 DATA 189,150,166,159.202 
DATA 222,202,215.229,235 595 DATA 189,166,191,159,292 
LIATA 222, 196, 208, 215, 225 649 DATA 156.156,176,183,292 
DATA 229,196,211,225,233 642$ DATA 161,128.176.199.199 
DATA 220,189,293,211,222 619 DATA-166,143,18S3, 159.199 
DATA 215.189,203,211,222 615 DATA 171,156, 185, 199.136 
DATA 136.176. 196,298,222 629 DATA 166,156.166, 185, 196 
DATA 211,185,196,211,220 638 DATA 166.1959,166,189,2a2 
DATA 211:181,202,211,224 635 DATA 166,137,166, 189,295 
DATA 295,176.,196,215,225 é49 DATA 166,137.166, 185.249 
DATA 295,172.196,20$,224 6435 DATA 166.143,176,159,208 
DATA 202,166, 189,211,222 650 DATA 166,139.166,189,211 


DATA 166.137.166,189.295 
DATA 166:137,166,185.285 
DATA 128,128.166,181,.202 


DATA -1:156.176,189,205,189,176,189,176,156, 176.156, 137.156, 137 
DATA 211,229 Eh 239,225,220.225,220.211.220,196,205.202,136 


1,2 
DATA 222,2 


Dr Jacques SAGLIER 
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Le "VIC:"20 ne 
l'instruction RESTORE x (où x est 


possède pas 


Le no de Ligne) mais il possede 
un pointeur vers Les zones de DATA 
en cours. Ce pointeur se trouve aux 
adresses 65 et 66 (65 octet de 
poids faible et 66 celui de poids 
fart?s 

Sur CBMé4, 
La même adresse; 
110-177: 


ce pointeur est à 
CBM: 62-63; ORIC: 


. PRINT PEEK (65), PEEK (66) nous 
permet d'obtenir Le contenu décimal 
de chacune de ces adresses (a et b 
par exemple) 


. à + 256 * b nous permet de trou- 
ver l'adresse de La mémoire vive 
qui nous intéresse. 


. En modifiant Le contenu a et b de 
ces adresses 65 et 66, nous pouvons 
donc renvoyer Le pointeur des DATA 
vers une Ligne qui nous intéresse, 
Le seul problème étant bien sûr de 
trouver a et b. 


. Le petit programme suivant va 
illuster de façon très simple La 
méthode que j'utilise : 





A l'exécution, on voit : 


- une série de 1 (Ligne 10) 
- 118 et 16 (contenu des adresses 
65 et 66) 

- une série de 2 (Ligne 30) 
So à: > sl |: 

- une série de 3 (Ligne 50) 
Expliquons maintenant Le contenu 
des adresses 65 et 66 





Le zéro de l'adresse 4214 est 


l'indication de fin de Ligne 100 
(qui vient d'être lue) tandis que 
celui de l'adresse 4231 est l'in- 


dicateur de fin de Ligne 110. 


Si je veux donc faire lire 2 
fois La Ligne 110, je devrai placer 
Le pointeur des "DATA" en fin de 
Ligne 100, ce que je vais faire par 


40 POKE 65,118 : POKE 66,16 
(19 octets) 

40 PRINT PEEK (65), PEEK (66) :: 
(19 octets également) 


L'utilisation de deux : permet 
d'avoir Le même nombre d'octets 
dans chaque ligne et d'éviter de 
nombreux calculs. 


A l'exécution, j'obtiendrai 
une série de 1, une série de 2 puis 
une nouvelle série de 2. 


Je peux aussi modifier La 
Ligne 20 POKE 66,135 : POKE 66,16 
et j'obtiendrai une série de 1 puis 
de 3 et enfin de 2. 


IL va de soi : 


- que l'apport de toute nouvelle 
instruction BASIC entraînera un 
deplacement de l'adresse des "DATA" 
donc une modification des valeurs à 
et b, F 
- que je ne place Les instructions 
PRINT PEEK: (65), , PEEK : (66) =: 
qu'aux endroits nécessaires. 


Bernard PETRISOT 


PE e Comme on %4 





Le programme ci-dessous charge 
une routine en Langage machine per- 
mettant de mettre bout à bout deux 
programmes BASIC avec chaînage cor- 
rect des lignes. 


Le mode d'emploi à respecter 
scrupuleusement est Le suivant : 


= ‘Entrer 
frappe éventuelle sera signalée 
après Lancement par RUN. En faire 
une copie. 


— Charger Le deuxième des program- 
mes à joindre, c'est-à-dire celui 
dont Les numéros de lignes sont Les 
plus élevés. | 


- En mode direct taper CALL 4400 
et appuyer sur RETURN. 


- Charger maintenant Le premier des 
programmes à réunir, qui à donc Les 
numéros de Lignes Les plus faibles. 


o1 

œ 

a) 

Lu 

a. 

[0 2 

Li} 

FE 

Æ 

Lens L2 

o [04 

œo Q. 

+ FE 

# € Lu 

x " TE 

Qres + 

Q + + 

Z Lu XX 

Lu) © X LU © 

à © © Z 

(CES TEE 

TH TA 

ERA EE 

K (SEE) 

A O0 
END Al 1 
LOMME 7 
ŒIL 0) = Li 
© © © © © © 
Qn1N M + n 
LR ES 


APPEND - Une erreur de: 


- En mode direct taper CALL #427 
et appuyer sur RETURN. 


Les deux programmes n'en font 
maintenant plus qu'un, comme on 
pourra s'en assurer par LIST. 


Attention ! Toutes autres opé- 
rations que celles décrites sont à 
prohiber. Surtout pas de RUN entre 
Les chargements. 


L'opération peut être renouve- 
Lée, La routine en langage machine 
étant hors zone BASIC. A noter qu' 
elle est entièrement relogeable. 


Enfin, Le chaînage de deux 
programmes avec des numéros de Li- 
gnes identiques est tout-à-fait 
possible, mais sans grand intérêt, 
Le deuxième programme n'étant nor- 
malement pas accessible. 


Jean RENAUD 


1800 DATA 165,167,133,130, 165,166, 133,12 
9, 160,0,165,129,208,2,198,130 

10605 DATA 198,129; 127,156, 145, 129,165, 15 
6, 208,2,198,157,198,156, 208, 234 

1010 DATA 165,15/,201,5, 208, 228,96,160,0 
» 20; 165, 129,229,156,165: 139 

1015 DATA 229,157,144,59,165,156,208,2,1 
98, 157, 198; 156; 177, 156, 208,244 

1020 DATA 56, 165, 156, 233; 1, 176,2, 198, 157 
5 133; 156, 127, 129, 145, 156, 230 

1025 DATA 156, 208, 2,230, 157,230, 129, 208, 
2: 230, 130,165, 167,197, 130,208 

1939 DATA 234,165,166, 197,129, 208, 228, 32 
:111;:197,198,156,76,58, 199,69 

1935 DATA 118,160,4,76, 237, 203,80,65, 83, 
32, 65,83,83,69, 90, 32 

1040 DATA 68,69,32.80,?76,65,67,69,33,0 


Fos RH De Z 
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Avez-vous déjà tapé NEW alors 
qu'en fait vous voulez garder votre 
programme? Ce petit programme qui 
exploïite La façon dont un programme 
Basic est, rangé en mémoire (voir LA 
COMMODE n° 9) est fait pour vous. 


En fait, lorsque vous faites 
NEW, votre programme n'est pas dé- 
truit. Seul Le lien de La première 
Ligne est remis à zéro, ce qui as- 
sure que Le système croit que le 
programme n'existe plus. 
x 


ja os (pointeur à programme) 


1ère Li OL Sp Ligne Jet 


(Lien) 





Après NEW, on a : 


(aol ie uis 


Pour annuler l'effet d'un NEW, 
il suffit donc de rétablir l'adres- 
se YY en XX, XX+1. 





me] 00 | , Le Ligne Jetc 


(intactes) 


Mais YY n'est autre que l'a- 
dresse de La case qui suit Le 00 
qui marque La fin de La 1ère ligne. 
D'où un programme très simple : on 


examine Les octets successifs de La 
ligne jusqu'à trouver 0. A ce mo- 
ment, Le contenu de l'index donne 
La partie basse de l'adresse cher- 
chée. La partie haute de YY est 
égale à La partie haute de XX car 
La Ligne fait moins de 80 caracte- 
res; elle est en DB+1. 


DB = $2B ; 64 et VIC.C'est $9A 
sur ORIC 
*x = $C000 ; sur 64. Sur VIC 


mettre $033C, sur ORIC 
$0400 

LDY #5$03 ; our commencer 
après Le n de ligne 

BCLE INY 

LDA (DB),Y; octet de La ligne 

BNE BCLE 

INY 

INY ; fabrique l'adresse YY 

TYA ; partie basse en A 

LDY =$00 

STA (DB),Y ; met La partie 
basse en XX 


INY 

LDA DB,Y  ; La partie haute 
de XX 

STA (DB),Y ; est en DB+1 

RTS 


IL suffit alors de faire SYS 
49152 (64) / 828 (VIC) ou CALL #400 
CORIC) pour récupérer votre pro- 
gramme. 


Daniel-Jean DAVID 








Je ne puis laisser passer sans 
réagir La réponse faite à J.C. 
RAIMBAULT: Il est parfaitement pos- 
sible d'assurer La compatibilité de 
L'EDEX avec une Répétition Automa- 
tique des touches : à preuve Le 
programme suivant que j'utilise 
quotidiennement (ou presque !) pré- 
cisément sur 4032 petit écran : 


Suppression par SYS 948 
Remise en route après un SAVE 
sur disquette par SYS 936 
La Ligne 130 actionne L'EDEX 
La Ligne 180 actionne REPKEY 
et efface Le programme BASIC 


100 REM J.PIERRAT VERSAILLES 21/06/82 

110 REM: PROGR. CREPKEY 40001] 

120 REM =ses===sz=z=====2=22== 

130 FRINTCHRS# (147): SYS40960:REM EDEX 

140 PRINT:PRINT:PFRINTSPC(13)"REPKEY 4000" 
150 REM ADAPTE D'UN ARTICLE DE LE? 


Le programme L.M est dans Le tam- 
pon 2ème cassette, dans Les 
zones d'adresses Libres (Les 
dix 0 de La Ligne 320 se sont 
révélés nécessaires par expé- 
rience !) 

Le DOS SUPPORT est compatible avec 
l'ensemble, à condition d'être 
chargé en premier. 


J.  PIERRAT 


DLR : Monsieur J.C. RAIMBAULT nous 


N 
a envoyé un programme semblable . 


ORDINATEUR INDIVIDUEL N. 15 MARS 89 


16% REM PROGRAMME DANS TAMPON ZEME CASSETTE ,DE 898 A 9S5B,UTILISE AUSSI 897. 


170 D=2898:REM=130.3 ADRESSE DE DEFART 
180 READB: IFBCOTHEN SY59%6: NEW: END 

1905 POKED,.B:D=D+1:GOTO180 

206 DATA165,151 :REM LDA ABS 151 

210 DATA201,255:REM CMP 255 

220 DATAZ40,16:REM REQ CLR 

230 DATA238,129,03:REM INC CPT 897 

240 DATA173,129,0%:REM LDA ABS CPT 

250 DATA201,15:REM CMP 15 

260 DATA208. 9:REM BNE OUT 

270 DATA169,255:REM REP)LDA 255 

280 DATA133,151  :REM STA ABS 151 

290 DATA169,08:REM LDA 8 

300 DATA141,129,03:REM CLR) STA ABS CPT 
310 DATA76, 79,228:REM OUT)JMP 58447 
320 DATA 0,0,0,0,0,0,0,0,0,0 

330 DATA 120:REM SEI 

340 DATA169,130:3REM LDAIM 130 

350 DATA133,144:REM STA(O), 144 

+60 DATA169,03:REM ILDAIM 03 


370 DATA133,145:REM STA(O),145 $0382-898=542S6+144 


380 DATASB:REM CLI 

390 DATAYE:REM RTS 

400 DATA2S4:1REM NOP 

419 DATAI20:REM SEI 

420 DATA169,79:REM LDAIM 79 
430 DATAISS, 1441REM STA(O) ,144 
440 DATA169,228:1REM LDAIM 228 


450: DATA133,14S:REM STA(O) 145:RETABLIT VECTEUR INTERRUP. $E44F=2288256+79 


460 DATABB:REM CLI 

470 DATAYEIREM RTS 

480 DATA-1 

490 REM 

500 REM POUR UTILISER REPKEY: SYS956 
510 REM 

520 REM POUR ANNULER :SYS 948 


530 REM RESPECTER L'ORDRE DE CHARGEMENT: DOS SUPORT,EDEX,REPKEY 


Le Cémméde n°91 
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Vous vous souvenez de l'esquisse de manip que nous donnions 


dans Le n° 4. (Ce numéro est épuisé, mais il existe un service 
photocopie pour Les abonnés). Eh bien, ces idées marchent comme nous 
l'ont prouvé quelques Lettres de Lecteurs. Les seuls problèmes ont 
été dus au fait que, lorsqu'on fait Le CLOSE du magnéto en écriture, 
ce magnéto doit être activé : en effet ce CLOSE produit 
éventuellement une écriture sur Le magnéto. 


Deux Lecteurs nous ont envoyé des compléments sur cette manip, 
qui, soit dit en passant, est applicable aussi au 64. M. ROUSSET 
nous fournit un système complet de mise à jour de fichier. M. BUTLER 
nous envoie une routine en langage machine qui active L'un ou 
l'autre magnéto en fonction de La touche F1 ou F3 et affiche sur 
L'écran quel magnéto est actif. 


Transfert et correction de données - Retour au magnétophone n° 1 
avec deux magnétos pour VIC 20 pour lecture d'un nouveau tampon de 
données, etc.., 

Point de_départ : : 

En_réalité bien plus complexe, car, 
par GET, il faut saisir Les données 
n° 4, p.41-44,. Il a été conservé caractère par caractère ; il faut 
La partie électronique et électro- des ‘retour chariot'' (CHR$(13)) à 


mécanique ainsi que certaines don- la bonne place. Les magnétophones 


Article paru dans LA COMMODE" 


nées relatives à l'activation des ont tendance à tourner n'importe 
magnétophones, des zones mémoires, quand d'où La redondance des ordres 
etCsse imposés par POKE pour Les poin- 


\ teurs, Les arrêts ou démarrages mo- 
teur, Les commandes de lecture ou 
d'écriture de bande. En outre, il: 
faut prévoir des temporisations car 
Le relais électromécanique est in- 
finiment plus lent que Les élec- 
trons dans Le microprocesseur (même 
commandé en BASIC). 


- Lire La bande magnétique du 
magnétophone n°1 (Les données 
s'inscrivent dans La zone tampon du 
magnétophone : de 828 à 1019) 


- Copie de ce tampon 17168 dans une 
zone mémoire (protégée par POKE 
56,28) de 7168 à 7359 


Les données : 


Elles doivent être ‘"forma- 

— Remise à zéro du tampon magné- tées'"". L'unité de base du transfert 
tophone est Le tampon magnéto soit 192 
octets (en réalité, seulement 191 


seront disponibles car en 828 il 
n'y a pas de donnée : essayez PEEK 
(828). En outre, l'octet 192 devra 
être un retour chariot imposé de 
manière explicite sinon il y aura 
concatenation avec Le tampon sui- 
vant.Il faut donc partager Les 192 


— Copie du tampon T7168 dans un 
tableau d'où La possibilité de 
modifier très aisément Le contenu 
de chaque case de ce tableau 


- Ecriture des données du tabteau 
sur La bande magnétique du magné- 


60 


tophone n° 2 . 


octets en un nombre de lignes de 


Le nn 0 


192/nL caractères (l'exemple choisi 
comporte 12 Lignes : 11 de 16 
caractères et La dernière de 15) 
mais, à l'écran, cela ne se remar- 
que pas si L'on fait : 


Lignes 17 à 11 5. - 

donnée de 14 caractères + CHR$(32) 
+ CHR$(13) ; soit: 176 

Ligne 12 : donnée de 14 caractères 
+ CHASC13) : soits 15 


au total: 176 + 15 = 191 


Le formatage doit être pro- 
grammé et bien protégé de La mal- 
façon (surtout Le dépassement en 
nombre de caractères et La mauvaise 
place des “retour chariot") . 


Exemple. 
Lignes colonnes 

IN Er 2 14 15 16 
1 A A A ve. A (32)(13) 
2 By (Bab) sers 10 (32) (15) 


p 
12 Q Q Q .....e Q (13) 


Le programme à été testé sur 
plusieurs tampons successifs puis 
La bande magnétique du magnétophone 
2 a été, à son tour, mise en Lec- 
ture, modifiée et recopiée à nou- 
veau sans difficulté (La Lecture se 
fait aussi bien par INPUT que par 
GET ). A partir de ce squelette de 
programme, on peut envisager toutes 


10 PRINT "CLR" : POKE 56,28 : CLR 
20  POKE 37138,PEEK(37138) OR 32 
30 GOSUB 1100 : POKE 7552,0 
40 DIM A $ (16,12) 

50  GOSUB 1300 : GOSUB 1400 : 

60 OPEN 2,1,1,"xxx2" 

70  GOSUB 1100 : PRINT 

80 OPEN 1,1,0,"xxxl" 

90  POKE 192,0 : POKE 63680, 169 
100 GET #£ 1, A$ 
110 IF PEEX (166) = 
120 IF A$ = 


190 THEN 140 
sg" THEN 140 


GOSUB 1200 : 


Les opérations de création, modifi- 
cation, ajout, recherche par mot- 
clé, etc.., en séquentiel, bien 
sûr. Evidemment, ce n'est pas de La 
T.G.V et il sera bon de prévoir un 
signal sonore pour avertir l'opéra- 
teur plus ou moins engourdi !!! 


André ROUSSET 


Adaptation __ aux ___éxtensions 
mémoire 

Comme La mémoire disponible 
d'un VIC 20 en configuration de 


base est trop juste pour accueillir 
un programme complet de manipula- 
tion de fichier, l'utilisation avec 
des extensions est à prévoir. Voici 
Les adaptations proposées : 


VIC de _ base ou extension_3K: 


Réservation mémoire: POKE 56,29 
début tampon : 7424 

fin tampon :, TO 
pointeur 1 1016 

VIC + extension &K: 

Réservation mémoire: POKE 56,63 
début tampon s: 16.128 

fin tampon =. 163319 
pointeur : 16.352D 


VIC + extension 16K: 


Réservation mémoire: POKE 56,127 


début tampon SCAN 
fin tampon se 327708 
pointeur >. "32704 


PRINT 


7 ER n° 
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130  GOTO 100 
140 PRINT : PRINT 

150  GOSUB 1500 

160  POKE 166,0 

170  GOSUB 1300 

180  POKE 64776,173 : FOR I = 1 TO 500 : NEXT 

190  GOSUB 1200 : BRINT 

200 I=0 

210 IF PEEK (7168) = 13 THEN I=14+1 

220  POKE 829,13 

230 FOR L = 1 TO 12 

240 FOR C = 1 TO 16 

250  AS#(C,L) = CHRS(PEEK(7168 + I)) 

260 PRINT A$#(C,L); 

270 IF AS(C,L) = "g" THEN PRINT ## 2, AS(C,L) : GOTO450 

280 I=I4+1:NEXTC 

290 PRINT 

. 300 BS = nn ; CH = nn 

310 PRINT "CORRECTION O/N":: INPUT CS : IF C$ < > nO" THEN 380 
320 PRINT "NOUVELLE DONNEE" : INPUT B$ : IF LEN(BS) > 15 THEN 320 
330  B$ = B$ + CHRS (13) 

340 FOR C= 1 TO 16 

350 A6 €,L) Æ MIDS(B$,C,1) 

360 NEXT C 

370 PRINT 

380 FOR C = 1 TO 16 , 
390 IF PEEK(166)=191 THEN AS(C,L)=CHR#(13):PRINT#É2,AS(C,L):POKE63715,32:GOTO0 430 
400 PRINT #4 2; Ag(c,L); 

410  NE&T C 

420  NEXT L 

430  GOSUB 1380 : GOSUB 1400 : GOSUB 1100 : POKE 166,190 : PRINT 
440  GOTO 90 

450 CLOSE 2 : GOSUB 1100 : CLOSE 1 : PRINT "TERMINE" : END 


1100 POKE 37136,PEEK(37136 )OR32 


1110 RETURN 1500 POKE 7552,PEEK(166) 

1200 POKE 37136,PEEK(37136)AND223 1510 FOR I = O TO 191 

1210 RETURN 1520 POKE 7168 + I, PEEK(829 + I) 
1300 FOR I = 828 TO 1019 1530 NEXT I 

1310 POKE I,O 1540 POKE 7359,13 

1320  NEXT I 1550 RETURN 

1330 RETURN 


1400 POKE 7552,0 

1410 FOR I = 7168 TO 7359 . 
1420 POKE I,0 

1430 NEXT I 

1440 RETURN 


André ROUSSET 
TOULOUSE 








Ce programme a été fait sur un 
VIC de base, il serait préférable 
de l'utiliser sur un VIC de même 
configuration. Il apparaît en haut 
à droite de l'écran Le numéro du 
magnéto qui est activé. 


La touche F1 active Le magnéto 1 
et La touche F3 active Le magnéto 2 


.s 1998 LDA $CB .s 1934B 
.: 1992 CMP #$27 .»s 1934D 
.» 1984 BEQ $190D .; 1258 
…. 1996 CMP #$2F :s 1952 
+ 1288 BEN #1948 ., 1355 
.> 194À JMP $1959 .s 1958 
. 196D LDA #9118 1958 
. 1319 DRA #+29 "| {asc 
.s: 191€ "ST 79110 .» 195E 
+ 1915 LDA #56 . 1960 
.: 1917 STA #1D81 ., 1962 
«s 191À LDR #+1DSA .s 1364 
.s 191D STA $A6 … TSÉÉ 
ss L91F LDA #$30 ., 1968 
.+ 1921 STAR #FB . 196A 
., 1923 LDA ##05 .:°196D 
. 1925 STA $FC , 196F 
«+ 1327 LDR #$Ca ss 1974 
.s 1929 STAR #FD "1973 
., 132B LOR ##10 ", 1975 
.s 192D STA #FE © 1977 
. 192F JSR $19R4 1 1379 
«s 1932 LDA #$80 .s 137B 
.» 1934 STA $FB 3: 1970 
.: 19536 LDA ##iC ., 195 
ss 1938 STA $FC 

.s 193A LDA #$3C «+ 1381 
.… 1930 STAR $FD -. 1953 
.: 193E LDA #$93 ., 1735 
+ 1949 STA $FE « 1987 
.: 1942 JER 519R4 … 19359 
.… 1945 JMP 51959 . 1380 
.: 1948 LDA 59110 + 135F 


RHD 
STA 
STA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 


STA. 


LDA 
STA 
JSR 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
JSR 
HOP 
LDA 
CMP 
FER 
LDA 
STA 
JMP 
LDA 


Après RUN/STOP + RESTORE, Les 
touches n'agissent plus, il suffit 
de faire SYS 6578 pour qu'elles 
soient de nouveau actives. 


Olivier BUTLER 


Adresse début = 6400 = 51900 
Variable A = PEEK (251) 

+ PEEK (252) x 256 
Variable B = PEEK (253) 

= PEEK (254) x 256 
#$DF …s 1991 STA $02FF 
#9119 .s 1394 LDA $82FF 
$R6 “1997 STAR FIE1S 
$1peû «so 1998 LDR #505 
$1n21 .s 199C STA 59615 
3RE . 199F JMP $EREF 
#$3C .s 1382 BRK 
$FE . 193 BRK 
#53 .s 19R4 LDY #$20 
$FC … 19R6 LDA <#FE),v 
4500 + 1988 STA C#FD), 
$FD + 19AA INY 
##1C .s 1SAB CPY #$CD 
$FE «: 19RD EHE #$13R6 
$19R4 .: 19AF RTS 
#$+C0 .: 1920 ERK 
$FE .. 19B1 BFK 
##1C 4» I9BR SEL 
$FC «s 13B3 LDA ##08 
#30 . 1985 LIN #$19 
FD . 1987 STR 50514 
##02 . 13BA,STX $9315 
$FE . 198D CLI 
519314 «s 19BE LDA ##19 

.: 19C9 STA #38 

eF2 .+ 1902 LDA $9112 
.: 1905 OPA ##29 
nee . 1907 STA $9112 
Hs ., 19CA LDA #$09 
#$52 .» 13CC STA $1D50 
+02FF . 13CF STA $1D81 
51934 .» 19D2 RTS 
#$B1 ni 


1903 ADC $F7EF:"% 
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En 
une aide appréciable pour Les pro- 


règle générale, EDEX est 


grammes. Mais parfois il devient 
néfaste, soit à cause de La répéti- 
tion rapide des touches, soit à 
cause des mots-clés abregés par ax 
(Tentez de mettre un a dans un 
INPUT), soit enfin de sa gestion 


dictatoriale de I.R.Q. dont votre 
propre programme en code machine a 
besion lui aussi. 

Voici un petit programme qui 
permet par un simple SYS de mettre 
EDEX en sommeil, puis par un autre 
de Le réveiller à volonté, tout en 
restant dans l'état initial choisi 
(pas à pas, pas de AUTO,...). 

La seule restriction est de ne 
pas toucher au bloc-note d'EDEX qui 
s'étend de $53D83 à 53F8. E 


OH-OFF 





Lit 


D -J Ji à F9 D © © DLLD 


APPEL FAR 575 559 









IRQ = #34 
CHAR = $r4 
DOS = #$308 ! 


CO TN & Lo Po 


pu) 
*# 
[1 
it 
Li in 
m 
4 


| PRUTIEHCE 
#$CE 

+3g 

#$FE6 

IRE + 1 


où Di -J 
nt 
Fa 
Len] 
pe 


LD CN 0 Où 


LD M 0 Fa 


Ce 
ram 


co 


nm 


DOS 
CO #$1r 
CHAR + 1 
DOS + 1 
HYFEM ! 
SUIT 
HÈEE 
STA CHR ! FHS 
HF 
CHAR + 1 
#$IIA 
CHAR 
FIH ! SAUT 
H$FF | CHR 
CHAR + € 


m Zi: 


[NE] 
in: 


Lt 


Je © 





A3DG 
572 
Dägd 
ESFF 


8572 


+ 2 


nn 


= 


QUET 5 


. 
—… 


Ps Pen Pa C2 Ve D Fe D eg Pen me me de pe de pot té ot dr 


A0 Où 9 in Le dt Pie 1 M O0 fi ON ee di 
A 
m 


D 6 M Le 1 © M C3 D 0 Di Go de TI ge 





* Charger éventuellement Le 
DOS, 

* Activer EDEX de 
usuelle par SYS46000, 
* Pour Le mettre en sommeil 
SYS 850, et si à ce moment 
vous êtes sous DOS, Les ordres 
DOS refonctionnent normalement 
avec à 

* Pour réveiller EDEX: SYS900, 
L'écran n'est pas modifié et 
DOS est intact. 


manière 


Le programme ne comporte volontai- 
rement que des sauts relatifs, il 
est donc translatable en mémoire. 


ELLE :< 


SUR PRIME FROVISOIREMENT EDE# 
l TOTALEMENT TRANSLATABLE 
| PEUT ETRE MIS EN ROM 


IMAGE DOS 


IREMET CHARGOT 
IRETOURHE AU. DEEUT 


SI FAS DE DS ACTIF OH À UH SAUT DANS EDE* 


LE DS REMET HORMAL 


IHCOHDITIOHHEL 
EH EIHAIRE HON SIGNE 


es Commons 

















39 FIN CLI 
31 RTS 

32 LHKA#EK RELANCE EDEN#KK#E# 
33 | APPEL PAR SYS 909 
34 
35 









* = 254 
SEI 


A34C 36 LOA H##4C 1! OH RECOHSTEUIT 
15Er 2574 37 STA CHAR 
1359 4945 33 LIA H##45 ! FOINT D'EHTFREE L'EDE* 
GZSB E571 39 STA CHAR + 1 
ASS AGEN + LIA #$EA 
GISF ESF2 41 STA CHAR + 2 
H=91 ZABIER 42 JSF #EHE ! COHTIEHT SEI À LA FIH 
Hd Ed 43 RTS 
4:25 +4 .EHII 





00 POREL; 52 FOREST S REM-=--nne mn nn FROG, HACH. OH à 
29914 DATHISG, 169, 46,153, 144,169, 250,133, 145.56,173.216,3, 233,2 

20829 DATA113.173,217,3.201.,176, 248,14, 169.230, 133, 112,169, 

294309 DATA1E9, 208, 133, 114,265, 4,233,253, 133. 114.:55,36. 


29646 FORISESSATOSSS : READA: POKET A: HEXT : RETURH 


60000: POKRE MAL IS:ROKESZ, 3: REN-----mnesmnsnns PROG. MACH.ÛFF  EDEX(CSTS 990) : 
69819 DATA1Z9,169,76.133,112,169.69.133,113,169,176,133.114,32,1F7, 186,36 
LOL La Pers | FOR1=20070916 : FREADA : FÜÉET , A: HEXT : FETLIRH 















Di re MN 


F4 49 ZE 55 36 À9 
Ë 35 AD DS 43 E3 
ri HZ CA EQ 
[s| ES €5 rA H9 FF 
5 


D D D Un 





Lo 
ta je OO Di Di JM Ù 


mines CN A AO pe pt 0 
Len ui LL 

KA] 

it 


DL Li M 
D iù EE lei 
: ee 

J 

où 

Le] 


9399 72 24 





Les utilisateurs de l'unité de Le programme de DOS décale tout Le 
disque utilisent tres souvent un programme du DOS qui ne fonctionne 
programme ‘DOS SUPPORT" qu'il est plus. Voici une méthode (valable 
très agréable d'avoir comme premier pour BASIC 2 - PET2001 et C8M3000). 


programme sur disque pour l'appeler 
par LOAD ‘'x'',8: RUN SYS 1024: accès au moniteur 
it 0400-0410 

Modifier Les octets de 0401 
0416 


S''N-D0S",08,0400,06B0 


Mais avec EDEX, il faut penser 
ensuite à faire SYS 46000 pour 
conserver Les commandes disques et 
bénéficier d'EDEX. 


*# © # *# * 


Vous disposez maintenant d'un nou- 


Pourquoi ne pas tout faire en veau moniteur N-D0S qui met automa- 
une fois ? tiquement EDEX en service, et qui, 
en prime tient moins de place sur 


Tenter de modifier à l'écran disque (seulement 3 secteurs). 


SE nets on 





65 





ELLE: 


am 


'CREE LHE HOUVELLE EN TETE AU DOS FOUR EDEX AUTOMATIQUE 


AZTA 1 
A4 Z + = fdn 
449 AA 3 .ETTE #$a 
H4ä1i 1444 + .HORD FIH 
A4A3 GA 5 .HNORD +4 
AdAS 3E 5 .«ETTE SE ! TS DS 
EdAé 313633 F «TEXT “1639 
A4GR ZA 8, sTEXT “°°” 
Ad4AP 2E 3 .ENTE SE ! SYS ELE: 
AAC ZE 1A .TEXT ‘4aaa" 
Gd411 ZH LAS TESTER 
Hdi À 12 .ENTE AZ |! HEU 
a413 A4 13 .EYTE +a 
Adi4 SA 14 FIH .HORD +4 
CESR 15..EME 

E% 

PC  IRQ SR AC KA TE SP 

.i Hdil ESSE 25 Ag SE AA F4 

.' 405 18 14 G4 Of GA GE 21 ZE 
.' d4NS 33 39 ZA 3E 24 26 54 24 
.' Hdi 26 SH AS 6f O9 A9 A9 aa 
A 5751659: 57546494: HEN 


Encore un “truc” : Lecture des 
cassettes du VIC 20 ou du CB3M 64 


sans POKE ! 


Si vous avez un CB avec EDEX, 
il vous suffit de faire APPEND pour 
pouvoir Lire et lister toute cas- 


sette en BASIC d'un CBM 64 ou d'un 
VIC 20. Pas de POKE, et pas de per- 
te de mémoire vive. 


J.il. DECONINCK 





LM + Basic : encore plus simple ! 


A condition que la partie en 
langage machine de votre programme 
BASIC soit logée entre Les adresses 
#400 à #4FF, il suffit à l'enregis- 
trement de faire: 


CSAVE"' PROG", A# 400 
C'est tout ! 


Au chargement, rien de plus 
que Le CLOAD''" habituel suffit, et 


par RUN. 


E ation: Au chargement Le poin- 
teur de début de BASIC (#501) n'est 
pas _modifié quelle que soit l'a- 
dresse de début d'enregistrement. 


Remargue: Si un tiers recopie Le 
programme par un CSAVE normal, La 
partie en langage machine ne sera 
naturellement pas sauvegardée. 


Jean RENAUD 
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Configuration 


Ce programme réalise La copie 
de L'écran en haute résolution 
obtenue avec La cartouche Super- 
Expander en graphic 2 ou 3. 

IL a été mis au point avec une 
Seikosha GP-100VC. IL doit aussi 
fonctionner avec Les 1515 ou 1525. 

L'imprimante doit avoir comme 
n° de périphérique Le 17 
LA ROUTINE SE CHARGE D'OUVRIR LE 
FICHIER IMPRIMANTE ET DE LA METTRE 
EN MODE GRAPHIQUE: inutile donc 
d'''envoyer'' OPEN4,4:PRINT 4,CHRS(8) 

La routine est  implantable 
dans Les 3K invisibles pour Le 





En mode graphique 2 ou 3 avec 
Super-Expander l'écran est organisé 
en 20 colonnes de 160 octets, soit 
une résolution de 160x160=256000 
pixels. 

La mémoire écran occupe donc 
(160x160)/8 soit 3200 octets im- 
plantables de 4096 ($1000) à 7296. 


L'octet destiné à l'imprimante 
en mode graphique se compose de 7 
bits significatifs, Le 8ème bit (de 
poids fort) est forcé à 1 pour que 
l'octet soit reconnu par lL'impri- 
mante comme caractère graphique. 

Pour faire une copie de l'é- 
cran il suffit donc de prendre les 
octets de La “MEV d'écran 7 par 7, 
puis avec un masque on forme autant 
d'octets imprimante (dont Le bit de 
poids fort est toujours à 1). Ainsi 
en terme de bilan mémoire, 7 octets 
écran" donnent lieu à La création 
de 8 octets ‘imprimante. 





4096 4257 
4096 kkkkkkk lkkkkkkkk ll SO KkKXKX | 
sms =! 
4097 1bkkkkkkxlkkkkkkkekxl  KXAkkXX | 
nn mm | 
4098 krxkkkkk lkkkkkkx KA kEXX | 
Insee ES el 
. .. . 
Ikkkkkkk LkkRREREX LS RXKXEX | 
| anne mme sas res =! 
kkkkkkk lkkkkRREX TL KkkkXX | 
nnmmmmmmmm —————, =! 
octet Idxkkkkixkx lkkkkkkkxk | SO kkkkXxx | 
impr. os on on on oo oo eo on ee me So u————m—mme | 
bfkkkkkkx Like xx | kkkkkX | 
l 


CREER eee eee LS RARE | 


cra À ou oo ou us oo mn on ee —…—…— | 


kkkkkX | 


456 xkkkkkkk lkkkkkxkEl 


Schéma de l’organisation de la mémoire 
d'écran en graphic 2 ou 3 


, 


Mode d'emploi 


Cette routine a été implantée 
dans Les 3K de Super-Expander qui 
ne peuvent servir au BASIC avec Les 
cartouches de 8 ou 16 K. 

ATTENTION! on peut La reloger 
ailleurs à condition de recalculer 
Les JMP et autres adresses, mais 
pas . dans _Le tampon cassette car 
cette routine l'utilise. 


; ji jé 








La copie peut être exécutée en 
simple largeur ou en double Largeur 
suivant Le contenu du registre 780. 

La copie peut être faite à 
gauche de La feuille ou centrée 
suivant Le contenu du registre 781. 

POKE 780,1 fait imprimer en 
double largeur. 

POKE 781,1 fait centrer La co- 
pie sur La feuille. 

Si Les registres 780 et 781 ne 
sont pas préparés La copie se fera 
en simple largeur et à gauche. 


D Condé: m4 





15 REM IMP DEMO . 





LU 
BI HN D 


7 
a 
39 REM LA CARTOUCHE SUPER-EXPANDER EST NECESSAIRE 


Te RE 
BR N PIRE 00 
VB OODPP III PIP PT D 
M a k 
sf DR 5 
44 FORI=STOIG23STEP63: DEAN; 6, TOI, 1923: DRANI ; L,AT01523, I'HEXT 
36 FORI=ITOSA4STEPS :CIRCLET, KI, S#1,3#I, 4HI, 29, BRCNERT 
OO M 
LA 0 7 
196 RE #RRAFAAANANAANARENRERE sr. Ji LUS pis 
114 POKETSM,G'REM COFIE EH SIMFLE LARGEUR 502 


EPP EN PTE PET DE LORIE 00 


LC 4 dl % # É 
LOL OLON LL , 


























LL ut 
LOLOLD 





LL LLLALL, LL 
LM CAL 




























CL CL 


DAME 7 * 


RPC CODE Ps 


A EE 





Le tout agrémenté d’une routine d’inversion vidéo 










LU 





NS 


LLLLOLOLDLOLOODDD 
LLLDTTIITIN 





/ 


2 // 
LLLLLLMLLLILLND LLLLLLLLN SD 


MA 
FETE ————Ÿt- 






















CL LO 


/ W U 
WW 






























DD 
LCL 


CALPPPLO 
LL L£ 
































LLLOLOIOPIIEIOY 
























































4 4 Morris tr / 4 
LD LD LL LU LLLLLOOOOOLCOOLOT LOT RÀ Li LL LL LL 
WMNIIII W WCT WII Ti 
tte LU, LL LOL 
LD AL L 0 LL LIL L LISTES UE, DD 4 WU, , 
LCL / Adhtrsaret 1/1 y LLLL PTE 
7 LL LL LL LU 4, RSS RÉ RORERS LL " # V4, LL L 04 1 




















LORD RL 0 4 
LOL DD LOL Z 
RÉ IRERI TILL ELLE TISSU) 





etienne vente 
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70 











API IDDN CRENDIBL/MERNZ CHE LOVE, 
LLOBOÔMMTMIIIIII I LL LU #4 PL LODD 
ADRESSE) CDN, NE D EOATE DES AV2E . 
LIGN ADK. CODE HE ETIQU. MHEMONIQUE COMMENTAIRES 











PLACE PRRORRMVE., WEML1SE VA C1P1 
ne DEV ERREN L'HYIC 29 EH 


11H ÉUÉPUS PAPE DE cd 


: ARTOUCHE en E*PAHIER. 
2, TABLE VS PONMNER 
PO OIPOIEN IPN 















4 LD 
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Le 6502 de L'Atari est secondé pour Les tâches d'affichage par deux boî- 
tiers, Le GTIA et ANTIC. Le GTIA gère l'interface télé proprement dit, alors 
que ANTIC organise L'image télé. C'est lui qui a donc Le rôle Le plus intelli- 
gent et, de fait, c'est un véritable microprocesseur. 





ANTIC étant un microprocesseur, il passe son temps à exécuter un program- 
me qui réside en mémoire. Ce programme s'appelle La DISPLAY LIST, ce qu'on 
pourrait traduire par ‘programme d'affichage". L'adresse du premier octet de 
La Display List est contenue dans Le couple 560(bas),561(haut) soit $230-231. 
D'où DL=PEEK(560)+256*PEEK(561). On a aussi DL=PEEK(741)+PEEK(742)+1. 


La Display List est une suite d'octets qui forment des instructions 
d'affichage. La plupart des instructions tiennent en 1 octet. Seules quelques 
unes prennent trois octets car elles contiennent une adresse. Le jeu d'ins- 
tructions est en fait très élémentaire (bien plus que celui du 6502). Toute 
instruction spécifie comment sera fait l'affichage sur un certain nombre de 
Lignes élémentaires du balayage télé. L'instruction vaut pour toute La Largeur 
de l'écran. 


IL y a trois sortes d'instructions: définition de mode, extinction et 
saut. 


* Les instructions d'extinction sont Les plus simples: 








code hexa dec effet 
0 0 Laisse en noir 1 Ligne élémentaire 
10 16 à 2 Le 
20 32 ” 3 «a 
30 48 # 4 ds 
40 64 is 5 . 
50 80 “ 6 é 
60 96 | T * 
70 112 di 8 JE 


IL faut un certain nombre de telles instructions en début de Display List 
pour être sûr que l'affichage ne soit pas trop haut sur l'écran en fonction 
des variations d'une télé à l'autre. 


NA TR et à À 


* Les instructions de mode ont leur code de 2 à 15. 


hexa dec mode graph. couleurs Lignes points colonnes octets octets RAN 





=. | Elie Core élém. _élem. /Ligne /Ligne /écran utilisée 
2 2 0 C 129 8 8 40 40 960 993 
L' 3 ou C 1,5 10 8 40 40 760 _ 
& 4 + C 4 8 8 40 40 960 .s 
c 5 = C & 16 8 40 40 480 s 
d, % 1 C 5 8 16 20 20 480 513 
PET À 2 C 5 16 16 20 20 240 261 
8 8 3 G 4 8 8 40 10 240 273 
9 9 4 G 2 4 4 80 10 480 537 
Ms 30 bn) G 4 k 4 80 20 960 1017 
D 11 6 G 2 2 2 160 20 1920 2025 
C 12 es G 2 1 "A 160 20 3840 = 
D 13 7 G 4 2 2 160 40 3840 . 3945 
E 14 Le G d 1 2 160 40 7680 = 
F 3 8 G 1,5 1 1 320 40 7680 7891 


On voit immédiatement qu'il y a des modes ANTIC qui né correspondent pas 
à des modes BASIC (obtenus par GRAPHICS 6). Le seul moyen de Les obtenir sera 
de manipuler La Display List. 


L'instruction de code 2 par exemple signifie: allumer Les 8 Lignes de 
balayage où on en est selon Le mode Basic 0. On à 40 colonnes. Pour chaque 
colonne, comme il s'agit d'un mode caractères, on lit Le code caractère dans 
La mémoire d'écran et on cherche Le motif binaire à allumer dans Le générateur 
de caractères. 


Si Le code était 15, on aurait à allumer 1 Ligne élémentaire selon Le 
mode Basic graphique 8. Chaque octet de La mémoire d'écran déterminerait ici 
l'allumage de 8 points élémentaires. 


Exemple: Le tableau ci-dessous représente La Display List en mode Basic 0. 
(On L'obtient par un programme BASIC très simple dont l'essentiel est FOR I=DL 
TO DL+... :LPRINT PEEK(I): NEXT I. Le programme que nous avons utilise est un 
peu perfectionné puisqu'on imprime trois valeurs par Ligne). On a imprimé en 
outre l'adresse de début de display List, l'adresse mémoire d'écran et celle 


de'la fenêtre (texte dans Les modes graphiques). 


MODE Q 
DL33368 SC408000 FE40820 
() ire 112 112 
3 66 64 156 
6 2 2 2 
9 2 2 2 
12 2 2 2 
15 2 2 2 
18 2 2 2 
21 2 2 PA 
24 2 2 2 

6 27 2 2 65 
30 32 156 2) 
33 Q 128 a 
36 (2) 2) (S) Û 
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Les trois 112 font laisser 24 Lignes élémentaires noires. Les 2 font 


L'affichage suivant Le schéma ci-dessous. 
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lie gosses > 8 Lignes noires 

We 8 Lignes noires 

112 8 Lignes noires 

66 64 156 8 lignes en mode O0 + définition 

adresse mémoire écran 

di. eres=ree==- > 8 lignes en mode 0 

à =. > 8 Lignes en mode D 
Less > 8 lignes en mode 0 

65 321-156 saut au début de La Display List 


Relation Display List-écran 


Le 66 est une instruction 2 modifiée. Lorsqu'à une instruction de mode, on 
ajoute : 


. 16 (510) permet Le scrolling horizontal fin à partir de La position modi- 
fiée. Ceci est très difficile à utiliser. 

« 32 ($20) permet Le déroulement vertical fin du nombre de Lignes élémentaires 
spécifiées par POKE en 54277. 


. 64 (540) transforme l'instruction en définition de l'adresse d'écran. C'est 
Le cas du 66 en 4ème octet de L'exemple. Les deux octets suivants sont l'a- 
dresse d'écran dans l'ordre bas,haut. On retrouve que 64+256x156=40000=adresse 
d'écran. 


. 128 (580) ajoute La possibilité de ‘Display List interrupt" : Lorsqu'on 
arrive à cet octet de La Display List, il y a une interruption. Si La routine 
d'interruption change Les paramètres d'affichage, on peut avoir un écran mixte 
(voir plus loin). 


* Les instructions de saut sont : 


1 51) saut pur et simple 
65 ($41) saut avec attente du retour du spot en début d'image. 


Les deux octets suivants forment l'adresse à Laquelle on saute. 

La dernière instruction de La Display List est un tel saut avec attente. 
L'adresse où on saute est 32+256*156 = 39968 c'est à dire Le début de La Dis- 
play List. Ce saut signifie tout simplement qu'en fin d'écran, ANTIC boucle 
pour parcourir La Display List en vue du prochain balayage écran. 


Examinons un second exemple, celui du mode Basic 2. 


MODE 2 
DL40536 SC49560 FF40800 . 
(g) tbe 112 TA - 2 
3 21 1712 158 
6 7 ? ? 
e | ? 7 ? 


; jai Se node n° 77 


12 ? F # 


15 66 96 159 
18 2 2 2 
21 6S 83 158 


On a d'abord Les trois 112 habituels. Les octets 7 sont ceux du mode. Le 
71 n'est autre que 7+64 c'est La définition d'adresse d'écran. Là l'adresse 
est 112 + 256 x 158 = 40560. On a ensuite 66 et trois 2. C'est La définition 
de La fenêtre en mode O0 qu'on à en bas de l'écran. Le début de La mémoire 
correspondant à cette fenêtre est 96 + 256 x 159 = 40800, c'est bien l'adres- 
se FE. On a enfin Le bouclage (65) à l'adresse 88 + 256 x 158 = 40536. 


On remarque qu'on a moins de 7 qu'on n'avait de 2 dans Le mode GRAPHICS 
0. Comptons Les lignes élémentaires ainsi formées: 


Pour GRAPHICS Ü, on à 24 instructions 2 (23 + Le 66) qui couvrent 
chacune 8 lignes élémentaires soit 24 x 2 = 192 lignes élémentaires. 


Pour GRAPHICS 2, on à 10 instructions 7 (9 + Le 71) qui couvrent 
chacune 16 lignes élémentaires soit 160 plus 4 instructions 2 (3 + Le 66) qui 
couvrent 32 Lignes élémentaires. La somme est encore 192. 


De fait, lorsqu'on fait une Display List il faut que Le nombre de lignes 
élementaires ne dépasse pas trop 192. 





La Display List permet des affichages spectaculaires, par différents 
effets. Essayons d'abord trois exemples simples en mode direct. 


Faites GRAPHICS O et DL = PEEK(560) + 256 x PEEK(561) 
puis POKE DL+17,156: POKE DL+16,64: POKE DL+15,66 
(On rajoute une instruction de définition de La mémoire d'écran au milieu de 
La Display List, qui d'ailleurs reprend l'adresse de début d'écran qu'on 
avait.) Cela produit deux fois Le même affichage sur l'écran. Spectaculaire, 
non ? 


Faites RESET, puis POKE DL+17,156: POKE DL+16,32: POKE DL+15,65 
(On met Le bouclage de La Display List au milieu de l'écran) Cela revient à 
avoir l'écran éclairé beaucoup plus petit que d'habitude. 


Essayons maintenant Le scrolling vertical fin. Ecrivez depuis Le haut de 
L'écran: 


LIGNE 1 

LIGNE 2 

LIGNE 3 

LIGNE 4 

LIGNE 5 
(sans faire RETURN qui créerait des messages d'erreur : allez à La Ligne par 
mouvements de curseur). 


Faites alors POKE 54277,5 et POKE DL+7,34. Il ne reste plus que 1/4 de 
LIGNE 3. 





Un gros intérêt des Display Lists est qu'on peut mélanger plusieurs modes 
sur l'écran alors que, bien sûr, l'instruction GRAPHICS O0 n'en génère qu'un. 


A Commis | bit à MP 
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En fait il y a un tel mélange dans Les modes habituels avec une fenêtre en 
bas de l'écran. 


IL y a deux éléments sur lesquels veiller : 
1- assurer La somme des Lignes élémentaires voisine de 192 


2- savoir comment écrire dans les différentes zones d'écran, car on est en 
dehors des modes Basic classiques. 


Exemple: Nous allons tracer un dessin en mode graphique 8 CANTIC 15) et au 
dessus mettre un gros titre d'une Ligne (mode 2, ANTIC 7) et un sous-titre sur 
deux Lignes (mode O0, ANTIC 2). Nous avons donc 4 zones horizontales dans Le 
dessin : une zone en mode 2, une en mode 0, La zone graphique en mode 8, et 
La fenêtre texte. Partons de La Display List du mode 8 (nous notons Les 
adresses sous La forme cccc (bb,hh) avec cccc = bb + 256 x hh. 


32822 112 112 112 

(54,128) 

32825 19 80 129 ----- > mém. ecran = 33104 
15 15 15 
15 15 15 


IL faut remplacer Les 32 lignes élémentaires Les plus hautes par Les 
modes 8 et 2. On va donc remplacer Le 79 et Les 31 premiers 15. Au point de 
vue mémoire d'écran, on se ramène à 33104 + 32 x 40 = 34334 (80,134). Comme on 
veut garder intacte La fin de La Display List, Le 79 80 134 sera en 32856 
(88,128) et suivantes. Notre haut de Display List est donc maintenant : 


32822 112 112 ile 
32825 79 80 129 
15 15 15 
32856 79 80 134 
15 15 14 


Mettons juste avant 32856 Les octets de définition des deux zones du 
haut. Nous pouvons prendre 33104 (80,129) pour mémoire d'écran de La première 
et 33144 (120,129) pour La seconde d'où : 


32849 71 80 129 
(81,128) 

66 120 129 

2 Frs 80 

134 15 19 


Ne Pam n° 11 


La seule chose à faire est maintenant de mettre un saut en 32825 qui en- 
voie Le contrôle en 32849. On pourrait aussi faire POKE 560,81:POKE 561,128. 
Pour faire tous Les POKE voulus, on arrangera Les données en DATA. 


IL reste maintenant à écrire dans les deux zones de titre. Pour cela, on 
trompe Le système : par POKE en 87 on lui fait croire que Le mode graphique 
est celui de La zone considérée. On impose l'adresse de mémoire d'écran par 
POKE en 88 et 89 et il suffit d'imprimer par PRINT#6. Sinon, on peut toujours 


faire des POKE en mémoire d'écran. Le programme ci-dessous produit un tel 
affichage 4 zones. 


12 SREPFICS B:OL=PCEK(SEQ)+2SEXFEEK(SS 1) 
28 COLOR 1:PI=3,14159265 
38 PILOT G,1c@ 
49 FCR X=2 TO 313 
50 7=1CG+S50xSIN(PIxx-/40) 
6Q CRAUTO X,Y 
78 NEXT X 
49 ? SINUSCICE 
1CG FCR I=0 TO 2 
119 RAEFD X:PCKE DL+3+I,X:NEXT I 
129 FCR I=9 TO 3 
13Q READ X:FCKE Ci+27+I,X:NEXT I 
15e PCKE 88,89:PCKE 89,129:FCKE 87,2 
16@ PCSITICN 2,9 
170 ? #6, "COURSE" 
259 PCKE 88,120:PCKE 83,123:PCKE 87,0 
269 PCSITION 2,0 
270 ? #6," TRACEE EN ‘ICCES" 
280 ? #6," MELANSES si 
1C00 CATA 23,50,129,71.80, 123,66, 120,129 
5 2573,393 134 
De 10 à 80 on crée l'affichage de La courbe et de La fenêtre. 
De 100 à 130 on modifie La Display List. 


De 150 à 170 on écrit Le titre en grosses lettres. 
De 250 à 280 on écrit le sous-titre. 


Une autre possibilité de La Display List est L'animation en BASIC. IL 
suffit de deux POKE Cen DL+4 et DL+5) pour changer l'adresse de La mémoire 
d'écran utilisée par ANTIC. IL suffit alors de préparer plusieurs images dans 
des zones mémoires différentes (pensez au POKE 87 ... pour La préparation) 
puis de mettre leurs adresses en DL+4 et DL+5 successivement. 


Une autre possibilité que nous n'étudions pas ici faute de place est 
celle de créer Les modes que BASIC ne peut créer alors qu'ANTIC Les possède : 
on met directement Les valeurs dans La Display List. Un tel mode intéressant 
est Le mode ANTIC 3 qui affiche Les caractères en grande hauteur ce qui permet 
des jambages pour Les minuscules. | 


Display List Interrupt 


On peut à chaque instruction de La Display List créer une interruption. 
Il faut : 


. ajouter 128 aux instructions de La Display List voulues. Par exemple, en GR. 


E A n° 71 73 


0, si L'on veut qu'il se passe quelque chose au milieu’'de l'écran, on affec- 
tera L'octet d'adresse DL+16. 


. créer en langage machine une routine de traitement. Dans notre exemple, La 
routine change La couleur du fond de l'écran (registre 5D018 en mode D). On 
aura donc un fond de deux couleurs, mais on pourrait en avoir bien plus. 


. mettre en 512-513 ($200,201) l'adresse de début de La routine qu'on vient 
de créer. 


. faire POKE 54286,192 pour autoriser Les interruptions. 


Nous implantons en $60Ù La routine suivante : 


code (décimal) instruction: 
Te PHA ; sauve À 
169 70 LDA #couleur ; rose 
181 10 Eté STA  WSYNC  ; adresse $D40A nécessaire à La synchro 
141 24 208 STA  $D018 ; registre couleur 
104 PLA ; restaure A 
64 RTI ; retour 


D'où Le programme à essayer: 


10 DL=FEEKC(SE0)+256*PEEKCSE I ) 

z0 PCKE DL+15,130 

30 FOR I=0 TO I1G:REND A:PCKE 1536+I,A:NE 
FI T 

40 PCKE 3512,9:PCKE 515,56 

50 PCKE 54286,132 

100 DATA ?72,163,70,141,10,212,141,24, 208 
» L04,64 


Ceci offre d'immenses possibilités d'obtenir simultanément sur L'écran 
plus de couleurs qu'on ne Le croyait faisable. 


Ce programme va nous permettre aussi de clarifier La notion de registres 
fantômes. Pourquoi Le haut de l'écran reste-t-il bleu ? Parce qu'au retour du 
spot Le contenu du registre fantôme associé à $5D018 y est recopie. Remplacez 
24,208 (Ligne 100) par 198,02 : Là Le rose devient permanent. 


Rita A. 








Pour résoudre - ce problème, 
dont l'exécution n'est pas néces- 
sairement instantanée, voici un 


exemple de programmation ‘en assem- 
bleur 6502, et une comparaison des 
performances d'un programme BASIC 
équivalent. 


"Facteurs Premiers" marche sur 
tous Les micro-ordinateurs équipés 
d'un 6502. Le listing d'assemblage 
a été obtenu avec l'assembleur de 
LA COMMODE. 





consiste 


Chacun sait en quoi 
La décomposition d'un nombre entier 
en facteurs premiers, cependant, il 


peut être utile de le rappeler, 
ainsi que La façon d'obtenir cette 
décomposition. 


Un nombre premier ne peut être 
divisé (division entière ou eucli- 
dienne, et reste nul) que par lui- 
même et par 1. Un nombre non pre- 
mier est ainsi Le produit de plu- 
sieurs nombres premiers. Par 
exemple : 168 = 2x2x2x3x7 . 


On simplifiescette écriture en 
écrivant 168 = 2” x 3 x 7 c'est- 
à-dire en n'écrivant chaque facteur 
premier qu'une fois dans la décom- 
position et en faisant figurer son 
exposant différent de 1. Dans l'e- 
xemple,le facteur 2 a L'exposant 3, 
cela signifie simplement que 168 
est divisible 3 fois par 2 soit 
qu'il est divisible par 2x2xe dont 





chacun connaît Le résultat 8.., 
mais 8 n'est pas premier. 
La méthode La plus efficace 


serait bien sûr de passer en revue 
tous Les nombres premiers et seu- 
lement Les nombres premiers. Mal- 
heureusement, il n'existe pas de 


formule permettant d'énumérer (di- 


rectement) La suite des nombres 


premiers. Par contre, il existe des 


procédés performants permettant de 
dire si un nombre inférieur à un 
maximum donné est premier ou non : 
Le Lecteur intéressé par ces pro- 
blèmes pourra consulter Le Livre 
“Calcul pour l'informatique" de 
Marie-José BERTIN, (chez Hermann). 


La méthode La plus simple se- 
rait de prendre La suite de tous 
Les nombres à partir de 2 et d'es- 
sayer toutes Les divisions par ces 
facteurs, en ajoutant chaque fac- 
teur ainsi trouvé aux facteurs déjà 
trouvés et en recommençant avec Le 
quotient obtenu. On s'arrête lLors- 
que Le quotient est 1, 


Exemple : 

168/2 donne Le facteur 2 et Le 
quotient 84 

84/2 donne Le facteur 2 et Le 
quotient 42 

42/2 donne Le facteur 2 et Le 
quotient 21 

21 n'est pas divisible par 2 
on passe à 3 

21/3 donne Le facteur 3 et Le 
quotient 7 

7 n'est divisible ni par 3, ni par 
4,5 et 6 qu'il faut essayer 
successivement avec cette 
méthode 

7/7 donne Le quotient 1, La 
décomposition est terminée. 


on 


Certaines. _ améliorations _ sont 
possibles en évitant d'essayer cer- 
tains facteurs non premiers. Ce 
type de modification est une amé- 
lioration de La méthode si Le pro- 
gramme perd moins de temps sur cet- 
te modification que sur Les calculs 
qu'elle permet d'éviter. Voici Les 
2 améliorations apportées à La mé- 
thode : 

1 . Les multiples de 2 et 3 sont 


faciles à éviter. Les multiples de 
2, de façon évidente en partant 


[ex 
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d'un nombre impair et en ajoutant 2 
à chaque ‘tour''. Les multiples de 3 
à l'aide d'un test permettant de 
"sauter" un nombre impair sur 3 : 
5071 .09)2111.13 0195) 17:19" r235185 
CAPE SE 


2 « Si Le quotient d'une division 
dont Le reste n'est pas nul, est 
inférieur au facteur essayé (divi- 
seur), on peut affirmer que Le nom- 
bre que l'on veut décomposer est un 
nombre premier. Ce n'est bien sûr 
vrai que parce que, à ce stade du 
traitement, on sait que ce nombre 
n'est divisible ni par Le facteur 
essayé, ni par tout nombre infé- 
rieur à ce facteur éventuel. 


Ainsi, Le test d'arrêt de La 
décomposition sera une des 2 condi- 
tions suivantes : 


- Le quotient obtenu est exact et 
égal à 1 | 

- Le quotient obtenu est inférieur 
au facteur essayé. Alors Le 
dividende est un facteur. 
premier ayant l'exposant 1. 


Le programme BASIC qui suit 
illustre de façon simple La métho- 
de: 


1 DIMT(12) 

19 INPUT'UN NOMBRE SYP";N 
20 FORI=3T012:T(I =D :NEXTI 
22 N#INTGN) : IFNÇITHEN18 
24 PRINT 'PRINTTAB(S);N; "=" 
30 T(12=1:T 221 : [=D 

40 K=2:G0SUB1008 

50 IFE=OTHEN100 

60 T(12=2:T(2)2E : I=2 

190 IFN#1THENS09 

119 B9=3:K=3 

128 GOSUB1008 

139 IFEDQTHENI=1+2:T(I-1)8K:T(I)8E 
149 IFN=1THEN5SO8 


150 IFXCKTHEHI=1+2:T(1-13=N:T(1)=1 :GOTOS00 


169 Kz=K+2:B9=B9-1 


‘179 IFB9=OTHENK=K+2: B9=2 
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189 GOTO128 

508 REM EDITION 

519 FORJ=1TOISTEP2 

S2@ PRINTT(J)"1"T(J+13; 

539 IFJ+1CITMENPRINT"+"; 

549 NEXTJ:PRINT 

550 GOTO18 

1909 E=2:X=N 

1819 K=X/K:IFN-KKINTCX)2@THENRETURN 
1029 E=E+1:N=X:GOTD1810 


‘ment modifiables 





IL est appelé par un programme 
BASIC qui fait toutes Les entrées- 
sorties. 


Le sous-programme assembleur 
est totalement paramétré. Les a- 
dresses des zones manipulées sont 
définies une seule fois en tête du 
sous-programme, et sont donc aisé- 
pour adapter Le 
sous-programme à L'une ou l'autre 
machine. 


Le Listing donné en exemple a 
été assemblé sur un VIC 20, équipé 
de l'extension RAM de 16K, La seule 
extension de 8K étant d'ailleurs 
insuffisante. 


Les zones 61, B2, ……; 88, ont 
été mises en fin de page O0 aux a- 
dresses 247 à 254.Ces zones étant 
en page 0, les instructions Les u- 
tilisant n'occuperont que 2 octets, 
au lieu de 3 pour des zones situées 
dans une autre page. 


La zone B9 et La table RESUL 
de 20 octets sont placées au début 
du tampon cassette. 


Le programme est placé en 
23552 et occupe 256 octets, soit 
juste 1 page en fin de mémoire. 





Le sous-programme manipule des 
nombres positifs codés sur 2 octets 
c'est-à-dire sur 16 bits et pouvant 
valoir de O0 à 65535. 


Les opérations effectuées sur 
ces nombres sont : 

- division 

- addition de La constante 2 

- comparaison 


Pour cela, il y a 2 sous-pro- 
grammes. utilisés : 





b: qui effectue La division du 
nombre (B3, 84) par Le nombre (B5, 
B6). Le dividende (B3, B4) est d'a- 
bord sauvegardé dans (87, B8). Le 
reste de La division est en (B1,B2) 
et Le quotient en (B3, B4) prêt 
pour La division suivante si La 
dernière est tombée juste. 


Le Pace n° 


Comment opère Le sous-program- 
me DIVISE ? Exactement comme vous 
Lorsque vous faites une division à 
La main. Bien sûr il y a quelques 
petits aménagements. 
calcul se fait en base 2, ainsi au 
moment pénible du ‘'combien y-va-t- 
il 72" (des adresses $5CD8 à S$5CE2 
du Listing VIC 20 + 16K) La réponse 
est simple (1 ou 0) ainsi que l'ac- 
tion qui suit puisqu'il n'y a pas 
besoin de multiplier Le diviseur 
par ce nombre avant de Le sous- 
trairesss 


Techniquement, il faut un quo- 
tient de 16 chiffres, Le plus sim- 
ple est donc de Les calculer de 
gauche à droite, en commençant par 
Les chiffres Les plus significatifs 
à gauche, même si ce sont des ‘"U". 


Ainsi, Le calcul se fait en 16 
étapes. À chaque étape, on décale 
Le dividende d'une position (binai- 
re) à gauche; La partie qui déborde 
(dans (B1, B2)) est comparée au di- 
viseur (‘combien y va-t-il ?") 


IL y a alors 2 possibilités : 


- (B1, B2) > = diviseur (B5, B6) : 
l'y. var1ufonise: 

. Le chiffre 1 est ajouté à droi- 
te des chiffres du quotient 
déjà calculés. 

«. Le diviseur (B5, B6) est re- 
tranché à (81, B2) : c'est fait 
en SUITE 1 

- (81, 82) < diviseur (85, B6) : il 
y va O fois et Le chiffre 0 
est ajouté à droite des chif- 
fres du quotient déjà trouvés. 


La zone (B3, B4) qui contient Le 
dividence au début est décalée d'1 
position à gauche à chaque étape. 
Cela libère une position de plus à 
droite de cette zone à chaque éta- 
pe: ainsi La zone (B3, B4) est uti- 
Lisable pour ranger Le quotient au 
fur et à mesure de son calcul. 
Economie : une seule zone (B3, B4) 
à manipuler. 


Les 16 étapes sont contrôlées par 
Le registre X, décrémenté en SUITE 
3 .Tant que Les 16 étapes ne sont 
pas effectuées on retourne en DE- 
CALE, sinon on ajoute Le dernier 
chiffre de droite au quotient (B3, 
B4) avant de revenir au sous-pro- 
gramme appelant. 


D'abord, le: 







$ 2 ajoute 2 au diviseur (B5,B6) 


DEB, MAZ : mise à 0 de La zone 


RESUL à RESUL 20. 


La zone RESUL est organisée en 
triplets : 


CRESUL + 1.+ 3n, RESUL, + 2 + 
3n) contient soit un facteur 
premier,soit 0 


RESUL + 3 + 3n contient l'ex- 
posant de ce facteur ou 0. 


DIV2 : La recherche du facteur 2 et 
de son exposant est faite par de 
simples décalages à droite du divi- 
dende, de façon à compter Le nombre 
de DU situés à droite. Ce nombre est 
égal à L'exposant du facteur 2, ba- 
se de numération. 


C'est évidemment cette partie 
qu'il faudrait supprimer, en utili- 
sant Le sous-programme DIVISE, s'il 
fallait réduire Le programme assem- 
bleur de façon à ce qu'il reste en- 
tièrement dans 1 seule page mémoi- 
re, si des modifications ou adapta- 
tions l'agrandissant étaient néces- 
saires. 

A La fin de cette zone, après 
BEQ S1, l'exposant non nul est ran- 
gé dans RESUL, et si Le nouveau di- 
vidende est égal à 1, Le traitement 
est terminé, sinon Le registre Y 
est augmenté de 3 pour pointer sur 
Le triplet suivant dans. RESUL. 


S1 : on initialise La recherche des 
facteurs supérieurs à 2. On range 
Le facteur éventuel 3 dans (B5, B6) 
(diviseur) et dans RESUL indexé par 
(Y-1, Y). De même, on initialise B9 
à 3 de façon à ‘'sauter'' par La sui- 
te Les multiples de 3. 


CHEXP : c'est Le début de la re- 
cherche d'un exposant, commençant 
par l'appel de DIVISE. 


Au retour on teste (81, Be), 
reste de La division : 
- s'il est nul, L'exposant du fac- 
teur en cours de test est incrémen- 
té de 1 (CRESUL + ,Y),puis si Le 
quotient obtenu en (B3, B4) est 
différent de 1 on retourne en CHEXP 
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tester à nouveau ce facteur. Si Le 
quotient obtenu est égal à 1, Le 
traitement est terminé. 


- s'il n'est pas nul, La recherche 
de lL'exposant du facteur (85, B6) 
est terminée : suite en FINEXP 


FINEXP : on compare Le quotient 
(B3, B4) au diviseur (85, B6) s'il 
est inférieur on va en QINF. 


NON : dans (B5, B6) ont met Le fac- 
teur éventuel suivant. 
Un coup sur deux B9 vaut O0 après 
décrémentation, on ajoute alors 2 
de plus à (B5, 86) de façon à évi- 
ter Les multiples de 3. 


Entre S1 et CHEXP, 89 est initia- 
Lise un point plus haut de façon à 
ce que ce traitement en bascule 
(+2, ‘+4, +2, +h,...)" ne commence 
qu'à partir de 5 et non pas de 3. 


S2 : Le dividende (B3, B4) est 
restoré avec (87, 88), si lL'expo- 
sant de l'ancien facteur est non 
nul, ou pointe avec YŸ sur le tri- 
plet suivant dans RESUL. 


S3 : Le nouveau facteur éventuel 
(85, B6) est rangé dans 

URESUL: =: 1Y p'RESUL ; #2), ‘puis on 
retourne en CHEXP. 


QINF : si lL'exposant du dernier 
facteur est non nul, on pointe sur 
Le triplet suivant dans RESUL. 
Ensuite, on range Le dernier divi- 
dende (B7, B8) (inférieur au carré 
du dernier diviseur (B5, B6) ) dans 
RESUL avec l'exposant 1. 


Le traitement est alors terminé. 


Mise en oeuvre du programme : 


Le programme, pour être uti- 
Lisé, doit être assemblé et rangé à 
l'adresse indiquée (23552 pour le 
VIC 20 + 16K). Ensuite, Le program- 
me BASIC donné plus loin doit être 
mis en mémoire puis executé. 


IL y a cependant un préalable 
important : Le programme occupe une 
page entière de mémoire qui doit 
Lui être réservée. 


Cas du VIC_ 20 : cette page ou un 
peu plus doit être réservée en fin 
de mémoire. Avec L'extension de 16K 
on peut faire, juste après La mise 


sous tension du VIC : 


POKE::51,0-2.PO0KE 52,92 :: POKE 53,0 
54,92 
POKE 56,92 : CLR 


Ainsi, on réserve 4 pages en 
fin de mémoire. 


programme dits La page 4 ($0400- 
504FF). L'appel se fera alors par 
CALL 400. 


Cas de_L'ATARI : On peut implanter 
Le programme en page 6 ($0600- 
$S06FF). L'appel se fera alors par 
SYS..1536. 

Cas_du _CB“_ 64 Le mieux est d'im- 
planter Le programme en  $CO00. 


L'appel se fera alors par SYS 49152 


cas des_ CBM_4000 et_cëM 8000 : on 
par :  POKE 49,124 : POKE 53,124 : 
CLR. L'appel se fera par SYS 31764. 


Après ce préalable, l'assem- 
bleur peut être chargé et exécuté; 
Le fichier source du sous-programme 
en assembleur peut être saisi (en- 
tré en clavier et sauvegardé ou lu 
depuis une sauvegarde sur disquette 
ou sur cassette) puis assemblé. 


Ensuite,  L'assembleur peut 
être supprimé par NEW. 


Le programme BASIC d'appel et 
de gestion des E/S peut alors être 
chargé et immédiatement exécuté. 


19 38249: B4=250 

15 R12830:R2=050 

29 INPUTN 

30 Q=INT(N/256) :ReN-256#0 

48 POKEB3, Q:POKEB4,R 

50 SYS23552 

60 FORISR1TOR2STEP3 

70 IFPEEK(I)268ANDPEEK( 1+1)2@THENPRINT 


N, ‘607028 


89 PRINTPEEK(12MN256+PEEKC 1+1) ; 
90 1FPEEK(1+22 C2 1THENPRINT" 9"; 


N PEEK(1+2)) 


108 IFPEEK(1+4) CHOTHENPRINT"X"; 
119 NEXT 
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B3 et B4 sont les adresses où 
Le nombre N Lu en 20 doit être ran- 
gé pour être transmis au sous-pro- 
gramme assembleur qui Le décompose- 
ra en facteurs premiers. 


R1 correspond à RESUL + 1 du sous- 
* programme assembleur 
Re =, 830: +. 20 = RESUL +: 41. 


La zone comprise entre Les adresses 
R1 et R2 contient La décomposition 
en facteurs premiers, sous La forme 
des triplets décrits précédemment. 


En 50, on appelle Le sous-pro- 
gramme assembleur, dont Le début 
est en 23552 pour Le VIC 20 + 16K, 
avec SYS 23552. 


Au retour, Les facteurs pre- 
miers et leurs exposants sont lus 
et édités entre Les lignes 60 à 
F0. 






Elles sont assez significati- 
ves de l'efficacité d'un programme 
en assembleur en comparaison du 
programme BASIC équivalent. Dans 
Les 2 cas, en BASIC, on initialise 
TI$ à ‘‘O00000" après La Lecture de 
N et on édite TI au retour : Le 
résultat est en 1/60ème de seconde, 
à 1/60ème près. IL faut s'assurer 
qu'entre lLl'initialisation de TIS$ et 
La Lecture de TI il n'y a aucune 
opération d'E/S, dans Les 2 cas. 


Voici Les résultats obtenus 
pour 3 nombres premiers (Les plus 
Longs à obtenir) : . 





ge1 B1 = 247 
002 Be = 248 
003 B3 = 249 
084 B4 = 250 
085 BS ms 251 
es B6 ms 292 
007 B? ” 253 
008 Be = 254 
089 B9 s 828 
210 RESUL = 629 
e11 W m 23552 


LE Commode #4 


On constate que les durées me- 
surées sont dans des rapports va- 
riant de 15 à 30. Il se peut que 
dans ‘cette mesure L'outil BASIC 
utilisé fausse en grande partie Les 
résultats, par réduction. Bien sûr, 
un rapport 30 paraîtrait plus spec- 
taculaire s'il était obtenu avec 


* des durées de 1 heure pour Le BASIC 


contre 2 minutes pour l'assembleur: 
ce serait Le cas avec un programme 
nécessitant davantage d'opérations! 





(1): SYS23552 
(2): CALL#400 
(3): SYS49152 


C4): USR(1536)  jeon-Louis GARRIVET 


Daniel TRECOURT 


012 SC08 RÀ9 08 DEB LDA #0 

013 5C02 A2 14 LDX #20 

014 S5C94 9D 3D 03 MAZ STA RESUL, x 
213 SC07 CA DEX 

016 5C98 DO FA 
017 SCOR A9 02 
018 SCC R8 TAY 


619 SCOD 6D 5F 03 STA RESUL++" 
028 SC10 AS F9 LDA 53 

021 SC1e EG DIV2  INX 

022 SC13 4A LSR À 
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023 SC14 66 FA 
024 SC16 90 FR 
025 SC18 26 FA 
826 SCIR 2A 
027 SC1B 65 F9 
028 SC1D CA 
029 SCIE F@ 10 
030 5C20 SE 40 03 
931 5C23 C9 60 
032 5C25 DO 06 
033 SC27 ÀS FA 
034 SC29 C9 @1 
035 SCeB FO eF 
036 SC2D C8 
037 SC2E C8 
038 5C2F C8 


639 5C30 À9 03 S1 
048 5C32 99 3D 03 
841 SC35 85 FC 

642 5C37 8D 3C 03 
643 3C3R A9 08 

044 SC3C 65 F 


B 
045 SCSE 20 B2 SC CHEXP 


046 5C41 AS F7 
047 5C43 DO 1A 
048 SC45 AS F8 
049 5C47 DO 16 
059 5C49 18 

051 SC4A A9 01 
052 SC4C 79 SE 63 
053 SC4F 99 SE 03 
Q54 SC52 ÀS F9 
055 SC54 D0 ES 
056 SC56 RS FA 
057 5C58 C9 81 
058 SCSA DO E2 


NVEXP 


BEQ S1 


STX RESUL+++ 


CMP #9 
BNE NVEXP 
LDR B4 
CMP #1 

BEQ RETOUR 
INY 

INY 

INY 


LDR #3 
STAR RESUL,Y 
STA B6 
STA B9 
LDA #9 
STA BS 
JSR DIVISE 


LDA Bi 

BNE FINEXP 
LDA Be 

BNE FINEXP 
CLC 

LDA #1 

ADC RESUL+,Y 
STA RESUL+,Y 


BNE CHEXP 


059 SCSC 4C B1 SC RETOUR JMP LAFIN 


060 SCSF ÀS F9 
061 SC61 CS FB 
062 5C63 90 35 
063 5C65 DO @6 
064 SC67 A5 FA 
265 5C69 C5 FC 
066 SC6B 98 2D 
067 SC6D CE 3C 03 NON 
868 5C70 DO 08 

069 5C72 20 F4 SC 

070 S5C75 À9 @2 

@71 5C77 6D 3C 03 

072 SC7A 20 F4 SC S2 
073 SC7D AS FD 

074 SC7F 85 F9 

075 SC81 AS FE 

076 SC93 65 FA 

077 5C85 B9 SE 03 

078 5C88 FE 03 

679 SCSA C8 

089 SCSB C8 

081 SCC C8 

082 SC8D ÀS FB S3 


FINEXP LDA B3 


LDA B7 


083 SC8F 99 3C 
084 5C92 AS FC 
085 5094 99 3) 
086 5097 4C SE 
087 SC9R B9 SE 

3 


131 SCEC CA 
132 SCED DO D4 
133 SCEF 26 FA 


134 SCF1 26 F9 


135 SCF3 60 
136 ;;; 

137 SCF4 18 
138 SCFS A9 62 
139 SCF?7 65 FC 
140 SCF9 85 FC 
141 SCFB 99 02 
14e SCFD E6 FB 
143 SCFF 69 


03 
03 


JC 
03 


03 


QINF 


LAF IN 
DIVISE 


DECALE 


SUITE! 


SUITEZ 
SUITES 


PLUS2 


PLUSF 


STR RESUL-,Y 
LDA B6 

STA RESUL,Y 
JMP CHEXP 
LDA RESUL+,Y 
BEQ 54 


LDA B?7 
STAR RESUL-,Y 
LDA B8 
STA RESUL, 
LDA #1 


STR RESUL+, 
RTS 


LDA B3 
STA B7 
LDA B4 
STA BB 
LDA #0 
STA Bi 

STA B2 
LDX #16 
CLC 

ROL B4 

ROL B3 

ROL Bè 
ROL B1 

LDA BS 
CMP B1 

BCC SUITEI 
BNE SUITEZ 
LDA B6 
CMP B2 
BCC SUITEÏ 
BNE SUITEZ 
SEC 

LDA B2 
SBC B6 
STA B2 
LDA Bi 

SBC B5 
STA B1 


SEC 

BCS SUITES 
CLC 

DEX 

BNE DECALE 
ROL B4 

ROL B3 

RTS 


CLC 

LDA #2 
ADC B6 
STA B6 
BCC PLUSF 
INC BS 
RTS 








Pour Les Lecteurs qui n'ont 
pas pu réaliser La carte haute- 
résolution parue dans ‘''LA COMMODE", 
voici un programme (inédit !) qui 
permet L'accès aux points élémen- 
taires (pixels) de L'écran. 


IL est destiné à tous Les Cä 
3000 et offre une haute resolution, 
à raison d'un point sur chacune des 
200 lignes elémentaires. 


La finesse des courbes obte- 
nues vous surprendra. 





Üñ ñe peut accéder à lL'affi- 
chage que par “EV écran. Pourtant, 


case mém. 32769, 3° ligne 





connaissant Le fonctionnement du 
balayage, et grâce à La rapidité du 
Llangage-machine, La haute résolu- 
tion devient possible. Voici 
comment 





Le (disceau U'ELeCirUIS (sputi) 
balaie l'ecran Ligne apres Ligne 
(il ne s'agit pas, bien sûr, des 25 
Lignes de caractères, mais des 2ÜÙ 
Lignes élementaires). 


A chaque passage sur un point 
donné, Le système vidéo recherche 
dans La “MEV écran Le code-ecran du 
caractère à afficher. 


C'est dans Le générateur de 
caractères qu'il va chercher Les 
bits à imprimer (fig. 1). 













(D 
(D 
D 
D 
(D 
D 


D 
D 
D 
D 

(D 





D 

D O € 

D 

D 

D 

D OO Q 





code écran 02 


bits : 00100010 


figure 1 


Conde 84 


#7 


CL 





Changeons Le code du caractère 
au cours de son balayage. On verra 
sur l'écran Le haut du premier ca- 
ractère et Le bas du second. 


Le jeu de caractères du Caii 
contient 3 segments verticaux qui 
permettent d'acceder aux 32) colon- 
nes élementaires. 


Leurs codes sont : 
(15 00: 95, Te, 097, 103: 


1014 66, 


S1, lors du balayage d'une Li- 
gne, La mémoire écran contient un 
de ces segments, 11 s'affichera un 
pointe. (f1g.?2 a). 


a) 


b) 


c) 





d) 


figure 2 


IL s'agira donc de placer pour 
chaque Ligne, pendant La période ou 
Le spot La balaïe, Le segment cor- 
respondant à lL'abscisse du point 
voulu sur La lLigne.Ill est effacé 
immédiatement après et remplacé par 
Le caractère de La ligne suivante 
Fra 2" DE 


livfauts 
L'opération à 
l'écran, 
seconde. 


bien sûr, renouveler 
chaque balayage de 
c'est-à-dire 60 fois par 


Pour Le spectateur, tout 5e 
passe comme pour une image normale; 
Le microprocesseur(x), sera occupé 
presque en permanence à substituer 
Les codes-écran dans La mémoire. 


L'image est mise préalablement 
en memoire dans deux tables de 200 
octets chacune : pour chaque point 
La colonne (Centre Ù et 39) et Le 
code-écran du segment (fig 3). 





39 
code écran : 93 


figure 3 





naturellement Le 


il se 
problème de La synchronisation avec 
Le balayage. 


pose 


Le bit 5 de lL'octet E840 
(59456) nous donne heureusement une 
indication précieuse : il est à 1 
Lors du balayage, à 0 pendant Le 
retour-image du spot. 


Nous pouvons donc savoir quand 
débute Le balayage d'une image. 


D'autre part, des calculs (Cet 
quelques tatonnements !l)Jont permis 
de déterminer La durée du balayage 
d’une ligne : 63 us (63.10 ‘s), 
c'est-à-dire 63 cycles pour Les 


instructions en Langage machine. 


Toutes Les opérations rela- 
tives à chaque Ligne devront donc 
ètre executées en 63 cycles exac- 
tement (car on n'a pas de test sur 
Le retour-ligne). 


(x) entre chaque balayage, environ 
4000 us de répit iui sont taissees 
(retour...1mage); elles pourront 
être utilement exploitées. 


de mine n°4 


Toute desynchronisation est 
fatale à La stabilité de l'image. 


Insistons donc sur ce temps 
très bref, et qui Limitera Les pos- 
sibilités du programme à traiter un 
seul point par ligne Cce qui n'est 
déjà pas si mal !). 





ci-joint ést en 
programme 
Langage-machine sous forme de DATA. 


. Le programme 
BASIC, et contient Le 


. IL à L'avantage de s'adapter 
facilement à La configuration de 
votre CB : 8, 16%ouk321K.-pour Le 
rangement des tables et du langage- 
machine en fin de mémoire, et La 
réservation mémoire. Les modifi- 
cations pour Le PET sont en REï aux 
Lignes 35, 5010, 5160. 


. L'INPUT en Ligne 50 permet de ne 
pas reenregistrer Le programme 
Langage-machine si on veut tracer 
d'autres courbes, en particulier si 
on change La Ligne 140. 


. Les deux tables et Le sous-pro- 
gramme L.i,. ont respectivement pour 
adresses M1, 2 et AD. 


. X est Le numéro de ligne et Y 
L'abscisse du point a imprimer. 


.. Le programme peut mémoriser 
plusieurs courbes entrelacees. 


. L'image apparaît à L'appel du 
sous-programme machine par un SYsS 
(Ligne 160). 


importante : seuls Les 
caractères sur lesquels passe La 
courbe sont effaces, Les autres ne 
subissant aucune modification, on 
peut conserver des textes avec La 
haute définition. 


Remarque 


« L'enfoncement de La touche SHIFT 
permet Le retour au BASIC, Les 
courbes s'effacent alors. En effet, 
Le microprocesseur ne peut gerer en 
même temps La haute-definition et 
Le BASIC. 


. On retrouve L'image instantané- 
ment avec SYS 256 x (3). 





Les habitués du langage-mach1- 
ne devraient pouvoir, sans trop de 
difficultés, nous l'espérons, adap- 
ter ce programme pour Les C8 400C 
et pourdquoi pas, pour Les 8000. 


Et maintenant, à vos claviers 


pour exploiter à fond Les possi- 
bilités graphiques, mathematiques, 
ludiques, etc.., de cette haute 
définition par programme L 


Pierre BARRAS 
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SASQ DATA 234,222,224,200,240,52,138:REM 206= NOMBRE DE LIGNES ELEMENT. 


REM ###HAUTE CIEFINITION ##% 
REM HHH##JUILLET 198S###MM#% 
REM AUTEURS = P, & C. BARRAS 
REM 

RE %## LECTURE DES DATAS #%% 


READC A:POKE 49,RA:POKE S3.A:CLR:3REM PET= READ A:POKE131, A:POKE135, A3CLR 


FOR I=1 TO 3:READ MSI :NEXT sM1=MC 104256 :M2=M6 204256 :AD=MC32M#256 
FOR I=Q@ TO R:REAQ NI) :NEXT 
INPUT'REMISE EN MEMOIRE OÙ PROGRAMME" :4$:1IF A$="NON" THEN 608 
READO A:1IF AG THEN A=ME-R5 :S=S-A 
IFAL2SSTHEN POKERD.8A :AD=AD+1 :5=2S+8R :GOTO0SS 
AD=MÉRIH2S6:IF SCA THEN PRINT'ERREUR DANS LES DATA! '":STOP 
FOR I=ti TO AD-13:POKE 1,32:NEXT 
REM 
RENM ##POUR PLUSIEURS COURBES## 
REM 
INPUT'NB CE COURRES"2:T 
FOR G=@ TO €T-1? 
FOR #=G TO 244 STEP T 
V=tG+1)#kmx. 108 
PRINT" 2" :G,x 
GOSUE 284 
| NEXT :HEXT :S%YS 256#M63) 
EWC 
REM ##MISE EN MEMOIRE ###m## 
RENM 
IF v<@ OR Y>32A THEN RETURN 
POKE Mi+%,""S3POKE M2+X.N<Y AND 72 
RETURN 
A REM ##%% M2,.M1,DEEUT PROG #x# 
ä DATA 29.368,31 :REM 8K 
5 REM 16K= DATA 61,62,68 
QG REM 32Kk= OATA 125,126,127 
St: 
AG REM ##% SEGMENTS VERTICALE #%# 
a SEE 141.84,71,.66,93,72,89,103,32 


a REM ##% PROGRAMME HIRESCREEN ##% 
S DATA 162,8,188,8,-1,169,8,133,17r7 


G DATA 169,128,138,178,173,122,G:REM PET= DATA 169,128,1933,178,173,4, 


à DATA 24@,1,.96,169,32,44,64,232 
A DATA 288,251,44,64,232,240,2S1 
@ DATA 129,0,-2,145,177,294,234,2934 


8 DATA 41,7,248,6,392,83,-3,r76,72 


v DATA -3,234,234,234,234,234,234 


& DATA SEM | re 


Su23@ DATA -145,177,188,8,-1,189,0 
51@@ DATA APTE r6.39,-3,169,40 


A DATA Z4,181,177, 138,177,169,0,101 ; 


5124 OATA 178,133,178,96,169.0,133,177 

513Q DATA 169,128,133,178,162,7,188 

S14@ OATA &,-1,169,32,145,17r7,82.83 

5150 DATA -3,138,24,105,8,170,224,200:REM 208=NBR LIGNES 

S164 DATA 144,237,76,0,-8R,16217:REM SOMME CONTROLE. SUR PET: 16071 
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HAUTE-DEF. .... PAGE agg1 


LOC 


gag 
aaaa 
aGaAG 
een 
age 
ana 
1F@8 
1F@a 
1F@@ 
1Fa@ 
1F@@ 
1FGa 
1F@8 
1Fa8 
1F@G 
1F@E 
1F@& 
1F@R 
1FG2 
1F85 
1Far 
1F@9 
1F8B 
1F@D 
1F1G 
1F12 
1F13 
1F15 
1F18 
1F1A 
1Fi0 
1F1F 
1F22 
1F24 
1F2S 
1F26 
1F27 
1F28 
1F23 
1F2B 
1F20 
1F2E 
1F30 
1F32 
1F35 
1F38 
1F39 
1F3f 
1F3B 
1F3C 
1F3D 
1FSE 
1F3F 
1F4& 
1F41 


CODE 


28 10 


G4 02 


4 ES 
4ù ES 


@8 1E 


cs 
34 


97 
aé 
S3 1F 
48 1F 


LINE 


PROGRAMME DE HAUTE DEFINITION 


:A RAISON O’UH PIXEL 
:PAR LIGNE ELEMENTAIRE 
3 AUTEUR = P. BARRAS 


} 


mi 
m2 


2 


LIBR 

OCTET 
SHIFT 
ECRAN 
WNBCOL 
NBL IGN 
SPC 


# 
DEEBUT 


CONTI 
BC1 


PRINC 


WNOWNIHC 


# 
L] 


NOP 
IN 
CP#x 
BEQ 


AND 
BNE 
JSR 
JMP 
WOP 
WNOP 
NOP 
NOP 
WOP 
WOP 
WOP 
NOP 
WOP 
NOP 


EUR EHNHEUUH 
# 
m 
œ 
LL 
@ 


##0n 
M1,x 
#<ECRAN 
Z 

#2 ECRAN 
Z+i 
SHIFT 
CONTI 


#$20 
OCTET 
BC1 

OCTET 
BC2 

me ,# 
C2), 


#NBLIGN 


FIH 


#507 
NONINC 
INCR 

NEUCAR 


20OCTET INDIGURANT L'ETAT OÙ SPOT 
SUR C.E.NM.=$98 


2POINTEUR HA LIGNE ELEMENTAIRE 
:CO00RD.CARACT, SUR LIGNE ECRAN 
2Z=POINTEUR DE 

20EBUT DE LIGNE 

2SUR L'ECRAN 
:AU DEBUT Z2=-32768 

PÉSUR C.B,.M.= AD 38 G@) 

2SI TOUCHE SHIFT ENFONCEE, 

?0N S'ARRETE 

#TESTE BIT S DE $ES4m 

#ATTEND LA FIN DE 

sL’'ANCIEN BALAYAGE 

*ATTEND LE DEBUT 

3DU NOUVEAU BALAYAGE 

PREND CODE CARACTERE 

LE MET À SA POSITION SUR ECRAN 
3TEMPORISATION DE 

36 CYyCLES 


BOUCLE PRINCIPALE 
?INCREMENTE N@ LIGNE ELEMENT 
2S1 FIN ECRAN,.ON TERMINE 


351 X/8 ENTIER.ON INCREMENTE 
LE POINTEUR DEBUT DE LIGHE 
30E 4Q ET ON IMPRIME LE 
CARACTERE SUIYANT 


2SIHOHN, 


2TEMPORISATION DE 
224 CYCLES 


Pons n° 77 


Lea 


HAUTE-CEF, PAGE 9682 


LOC CODE LINE 
1F42 Ef NOP 
1F43 EA NOP 
iF44 A9 20 LOA #SPC :EFFACE CARACTERE 
1F46 91 Bi STA 62, :PRECEDENT 
1F4S8 BC @@ 10 NEUCAR LOY Mi,x »Y=COORD. SUR LIGNE ECRAN 
1F4B BD @@ 1E LOR M2,x :MET CARACTERE À IMPRIMER 
1F4E 91 Bi STA (2, ?DANS SON ADDRESSE ECRAN 
1FS@ 4C 27 1F JMP PRINC 2RETOURNE À LA BOUCLE PRINCIPALE 
1F53 E 
iFS3 A9 28 INCR  LOA #NBCOL ? INCREMENTE 
1F5S 18 CLC :LE POINTEUR DE 
1F56 65 Bi ADC Z ?DEBUT DE LIGNE ECRAN 
1FSS 85 Bi STA Z ?DE 49 
1FS5A A9 G@ LOA #@ 
1F5C 65 2 ADC Z+1 
1FSE 85 82 STA Z+i1 
1F6û 68 RTS 
1F61 ; 
1F61 A9 @@ FIN LOA #<ECRAN 2REINITIALISE LE 
1F63 85 Bi STA Z :POINTEUR ECRAN 
1F65 A9 8a LOR #>ECRAN 
1F67 85 B2 STA Z+1 
1F69 A2 @7 LOX #7 PNG DE LIGNE ECRAN 
1F6B BC @@ 10 LIGNE LOY M1.x :COORDONEE CORRESPONDANTE 
1F6E A9 28 LDA #3PC :EFFACE LE CARACTERE QUI 
iF7@ 91 Bi STA €Z),Y :N'AVAIT PAS ETE EFFACE 
1F72 26 53 1F JSR INCR ?INCREMENTE POINTEUR 
1F7S 8A TKA :INCREMENTE NO DE LIGNE 
1F76 18 CLC DE & 
1FF7 69 08 AOC #& ; 
1F79 AR TASK :SI <2@@,0N 
1F7A E@ Ce CPX #NBLIGN ?CONTINUE. 
1F7C 98 ED BCC LIGNE :SINON ON RETOURNE 
1F7E 4C @@ 1F JMP DEBUT :AU DEBUT OÙ PROGRAMME 
1F81 . END 
ERRORS = G8@@ 
SYMBOL TABLE 
SYMBOL VALUE 
BC1 1F15  BC2 1FiA CONTI 1F13 DEBUT 1F@@ 
ECRAN  8@29 FIN 1F61 INCR 1F53 LIBR G@E4 
LIGNE 1F6B Mi 1D06@ M2 1E@@  NBCOL ae28 
NELIGN  28C8 NEUCAR  1F48 NONINC  1F38 OCTET E84a 
PRINC 1F27 SHIFT aza4 SPC eeza Zz aeB1 


END OF ASSEMBL'Y 
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Voici un programme utilitaire qui permet 
d'écrire en noir sur fond vert, sur CBM 3032 


. 


Le Cul execute 60 fois par se- ture noire sur fond vert). 
corde une routine d'interruption 
permettant de prendre en compte une Pour revenir à La normale. e- 
frappe clavier. Cette routine d'in- criture verte sur fond noir, on re- 
terruption est situee à l'adresse tablit Les vecteurs d'interruption. 
SE6RE. Le Ca s'y dirige par Les 
adresses 9590 et 591 contenant res- 590 52E POKE 144.46 
pectivement ÿS2E et »E6. 591 ÿ$E6 POKE 145,230 

A ces adresses, imposons l'a- Attention, tant qu'on dévie La 
dresse de notre sous-programme (si- routine d'interruption, on ne peut 
tue en 626, bufter du magnetophone utiliser Les magneto-cassettes. 


numero 2 soit 50334) 
Ci-joint Le suus-programme dè- 
en Sy >3A POKE 144,58 sassemble par EXTRAMON 1000 suff1- 
591 503 POKE 145,3 samment Commente ut Le progranime 
Basic en permettant Le charcement. 
Avec cette deviation et notre 


Suus-programme tous Les 1/60ème de Ce programme fait suite au 
seconde, on inversera Les caracte- programme TREVERSE publié dans Le 
res video qui ne Le sont pas (ecr1- numero 7 de La Commode. 

.… OSSR ÀS 97 LOR +37 On teste si une touche est enfoncée au 

r -OSSC CA FF CMF #$FF clavier (Pass de touche: C#97TUI=#FF 5 

-r 633E D6 3F BHE +637F Si touche enfoncée: saut em $437F 

.r 6345 À5 Cd LOR $Cd4 Sauvegarde du pointeur adresse écran avant 
... 542 SD AG 3 STA +Aa2A exécution du S'P, dans les mémoires 

.r 0345 A5 CS LDA +CS $a5:A8-25A1 

.. 0347 SÛ A1 A3 STA +83A1 

.. 34 A2 ag LO* #$00 D —-> x 

.. A24C ÀS aa LOA #+aa Initislisstion pointeur adresse écran à 

.r AGE 85 Cd STA +$Cd4 +enan soit 32768 qui est le début de la 

.. 356 A9 80 LOA ##$88 mémoire écran 

., 0352 85 C5 STAR $CS 

.. 0354 AG aa LDT #+#00 dre 0 » 
.. 03256 Bi C4 LOR <$c4r,y Contenu case écran pointée par Ÿ --> Acc 
.. 8358 CS ga CMP #$20 Comparaison avec 128 C$8%i 

.. O25SA 19 4 BPL +026a 2128 : khranchement en $636A 

.. G35C 69 Sa ADC #+$#80 L128 : on sjoute 128 Cuidéo inversée 

«+ G3SE 91 C4 STA <$car,v Réécriture case écran 

.r 0368 CE IN Lis More : 

.- 0361 CO 28 CPY #$28 A-t-on testé les 40 cases d'une ligne écran 
«+ 06363 D6 F1 BNE $a356 si non : retour en #$9356 
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.r OSES 18 CLC 
.r 6566 À9 28 LOR #$28 
-r 4368 65 C4 ADC +$+C4 
-. OSER ES C4 STA $+C4 
-. ASEC 90 @2 BCC +0376 
-. OS6E E6 CS INC #CS 
.r 0570 ES : IHX 
sr OS1 EB 193 CPX #$19 
.r 6573 D6 DF BHE $G554 
GS AD ÀG @G3 LOA $83A8 
a5r7S8 85 C4 STA $C4 
-+ GSFA AD A1 @3 LODR $83A1 
-.r OSrD 85 CS STA +$CS 
.. ASFF 4C ZE E6 JMP $E62E 


11 REM#MÉ#MAEMMMNAMMMEMENMMMNNMN 


12 REMX PROGRAMME FOHNDINYERE  % 
13 REM% # 
14 KEM% VIDCEQ IHVERSEE  %# 
15 REM% COPYRIGHT À. HESBOIS * 
16 FEMX JUIN 198% * 
17 REMÉMENHEMMMMMMMENVIENMENNES 
à = a 

13 REM CGHT SF LANGAGE MACHIH 
Z2G READL 


21 RERADAS:1FA$="#"THENZEÉ 
22 A=ASCÉASI-4S 2: E=ASCCRIGHTSCA 
23 M=B+P#CE5SD-CC=224C1LEHRCA+ TH 


25 REM SP LANGAGE MACHINE 

26 DATA 826 

27 DATA À5,97,C9,FF,D0,3F.,R5,C 
28 DATA @3,45,CS.80.A1.83.A2.0 


On ajoute 48 au pointeur adresse écran en 
tenant compte d'une éventuelle retenue 


Les 25 lignes d'écran sont-elles testées 7 


si non : retour en $a354 
Restauration du pointeur adresse écran tel 
qu'il était avant l'aæprel du S/P 


Retour à la routine d'interruption svstème 


E 


$.192—-48 :C=LENCASD 
CH2>99399 :POKEL .H:L=L+1:GOTOZ21 


4.S8D0,A€ 
ë .A3.G& 


293 DATA 85,C4,A9,680,85,CS.R8,.48,.B1,C4 


38 DATA C9,.88,14,804,69,88,91.C 
31 DATA 28,06,F1.15.,9,28.65.0C 
32 DATA 96.02,E6,CS.E8,E6.,19,0 
33 OATA ÀG,83,85,C4,A0.A1.03.,6 
34 DATA 2E,E6.*# 


36 REM MODE EMPLOI 
37 PRIHT"'J"TAB(152 "9 FOMOIHYER 
38 PRINT"'ÆMOUR ACTIVER CET UT 


4+.C8,ca 
4,.85,C4 
8.D0F AD 
SrCS 40 


S “ 
ILITAIRE FRAPPEZ 


33 FRINT"'HEN MODE DIRECT 3 FOKE144,SS:POKE145,3 " 
40 PRINT"'AMPOUR DESACTIVER L'UTILITAIRE FRAPPEZ 


41 FRIHT"'BEN MODE OIRECT g4 PFOK 
REAC'r. 
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E1i44,46:POKE145,236 ":END 


A. HESBOIS 


Chris n° 77 








Nous inaugurons avec ce numéro 
l'emploi de signes conventionnels: 
*** = indispensable . = bof 

*x = achetez 0 = zéro 

* = utile 000 = beurk 





Ce guide très bien réalisé est 
indispensable que vous ayez ou non 
un microordinateur. IL donne un pa- 


norama extrèmement bien fait de 
tout ce qu'il faut savoir en micro- 
informatique. On trouve successi- 
vement une introduction technique à 
La micro (dont certains points sont 
détaillés dans une section consa- 
crée aux branchements et interfaces 
et dans une section spéciale gra- 
phiques), un banc d'essai‘ résumé 
des principaux micros du marché, 
une Liste de clubs (où on ne parle 
pratiquement que des iicrotels), un 
panorama des logiciels pour chaque 
micro, une bibliographie complète 
et bien commentée, une liste de Li- 
orairies spécialisées, une étude 
sur La Presse Microinformatique et 
sur Les Radios, une Liste de bouti- 
ques micros, une étude sur Les or- 
ganismes publics liés à La micro, 
sur Les formations, un calendrier 
des expos jusqu'à mai 85, un glos- 
saire et enfin La liste des édi- 
teurs en micro. Le tout est très 
correctement fait et justifie cent 
fois l'achat. 





sur Forth. 
Pas étonnant, l'auteur est L'inven- 


Le meilleur Livre 


Langage. Si vous voulez 
comprendre FORTH, jetez 
Les autres Livres que vous aviez 
éventuellement achetés (tant pis! 
il fallait Lire cette biblio a- 
vant!) et lisez celui-ci. Par exem- 
ple un des éléments Les plus diffi- 
ciles à comprendre en FORTH est 
celui des modes de fonctionnement: 
est on en mode édition, en mode 
compilation, en mode adjonction au 
vocabulaire etc...? Eh bien ceci 
est parfaitement expliqué dans ce 
Livre. Notons aussi que La compré- 
hension est facilitée par d'excel- 
lents petits dessins. 


teur du 
vraîment 


Livre 


versions du même 
selon que vous avez un ORIC 1 ou un 


Deux 


ATMOS. 
programmes, 
Listings sont très bien 


IL s'agit d'un recueil de 
surtout de jeux. Les 
imprimés. 


Les programmes en eux-mêmes sont 
intéressants. On peut regretter 
L'absence de commentaires, mais 


alors Le Livre aurait fait 200 pa- 
ges grand format. Faites l'effort 
de comprendre Les programmes. Il y 
en a 39 qui font tous en moyenne 2 
pages de Listing: c'est donc plus 
conséquent que Les ‘pour tous" et 
autres. 


Ce A e : no 
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Nous mettons 4 étoiles car ce 
Livre Les mérite, ou même 5 ou 6! 
Si L'ORIC ou L'ATMOS vous passion- 
ne, posez votre exemplaire de La 
Commode et courez l'acheter. C'est 
ce Livre Là qui mériterait Le titre 
“tout savoir sur ORIC'"' et non pas 
celui de chez Eyrolles qui porte 
prétentieusement et äindüment ce ti- 
tre. Après La parution d'un tel Li- 
vre, La Commode n'a plus de raison 
de parler de L'ORIC (voyez tout de 
même Les articles ORIC de ce numé- 


ro!). En effet ce livre offre non 
seulement La Liste de toutes les 
adresses intéressantes de L'ORIC 


avec bien entendu Les correspondan- 
ces pour l'ATHOS, mais encore elles 
sont toutes expliquées de façon 
détaillée. IL n'y a pas Le Listing 
désassemblé ‘de La ROM, mais il y a 
ce Listing pour Les parties Les 
plus importantes et elles sont 
commentées de façon circonstanciee. 
D'autre part, toutes Les notions 
qui sont expliquées sont accompa- 
gnées d'une application utile qui 
s'y refère. Quoi? Vous n'êtes pas 
encore parti chercher ce Livre? 

l / 









Ce Livre décrit de façon dé- 
taillée et progressive comment pro- 
grammer Les Joueurs et fMisiles (Les 
sprites"" de L'Atari). Toutes Les 
notions sont accompagnées de pro- 
grammes-exemples intéressants et 
bien imprimés. Le seul défaut de ce 
Livre est La langue anglaise: il 
suffit d'un éditeur et un traduc- 
teur pour supprimer cet obstacle. 





Ce Livre est un cours détaillé 
du langage BASIC ATARI. Il est très 
fouillé mais l'exposé est progres- 


sif. Tous Les éléments sont étudies 
avec de nombreux programmes-exem- 
ples. Les modes graphiques sont, 
entre autres, bien étudiés. Les 
de programmes sont bien 


Listings 
imprimés. 


Pierre-Etienne THALBERG 








commercialise 
une cartouche de 


Cé4 à l'usage des radio-amateurs 
CRTTY): 
Computer World 
P. Box216 
1230 AA LOOSDRECHT 
Hollande 


Prix : 139 Livres ou 189$ 


* x 
* 






vient de se doter d'un 


centre serveur expérimental : 


ETCIB - ECOLE PIGIER 
Centre Serveur Expérimental 
7 bis Avenue de La République 
93250 VILLEMOMBLE 


Les responsables du centre sont : 


Messieurs VALDERE et CASTRATARO 
tel: (16 x 1) 854 09 80 
;. 528 60 64 


* x 
* 


BEM organise durant Le mois d'août 
des stages d'initiation à La micro- 
informatique. Chaque stage dure une 
semaine et coûte 1000 F, frais de 
nourriture non compris. 


Stage INFORMATIQUE et MONTAGNE 
au centre du col de La Charmette en 
Chartreuse. 

6 demi-journées consacrées à l'in- 
formatique. 6 demi-journées consa- 
crées à La montagne. 


du. Lundi 6 au samedi 11 août 
du lundi 13 au samedi 18 août 
du lundi 20 au samedi 25 août 
du lundi 27 au samedi 1er septembre 


Initiation à La micro-informa- 


conversion pour 


tique, connaissance du BASIC, pro- 
grammation en BASIC, applications 
micro-informatiques, utilisation 
des programmes d'applications 
standards. 


GiE: M: 
GRENOBLE ET MONTAGNE 
18 rue Brocherie 
38000 Grenoble 


tel: (76) 42.53.22 


* x 
* 





j : (Ecole Professionnelle Supé- 
rieure) organise dans Les centres 
EPS de Paris, Guyancourt, Nantes et 
Lyon Les formations aux qualifica- 
tions professionnelles suivantes, 
agrées par Les Commissions Paritai- 
res de l'Emploi du Commerce, de La 
Pharmacie et de La Coiffure : 


- Analyste-programmeur en micro-in- 
formatique (6 mois à temps plein), 


micro- 
temps 


-  Technico-commercial en 
informatique (6 mois à 
plein), 


—- Technicien de maintenance en 
micro-électronique (6 mois à temps 
plein), 


- Secétaire bureautique (6 mois à 
temps plein), 


industrielle 
temps 


- Micro-informatique 
et de gestion (3 mois à 
plein). 


Les inscriptions pour Les prochai- 
nes sessions débutant courant sep- 
tembre et octobre sont en cours 
(l'admission se fait sur test et 
entretien). 

Pour tous renseignements, appeler 
EPS (3) 043 57 90 ou (1) 523 35 30. 
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EPS organise également chaque mois 
plusieurs sessions de formation aux 
progiciels : dBase II (3 jours), 
Wordstar/Mailmerge (2 jours), Mul- 
tiplan:: (2: jours), Lotus 1,253: C3 
jours), etc... notamment sur micro- 
ordinateurs IBM-PC, AXEL, ZENITH, 
RAIRS VICTOR, ::. 


Pour recevoir Le calendrier de ces 
stages ou pour l'organisation de 
stage_sur mesure, écrire ou télé- 


phoner à : 


- EPS Paris, 45 rue des Petites 
Ecuries, 75010 Paris 
(tel: (1»:523:35 :30) 


- EPS Yvelines, 25 rue Ambroise 
Croizat, /8280 Guyancourt 
(tel: (3) 043 57 90) 


- EPS Nantes, 8 rue Linné, 44000 
Nantes (tel: (40) 73 52 58) 


- EPS Lyon, 145 rue Jean Jaurès, 
69002 Lyon (tel: (7) 858 90 59) 





Création d'une BIBLIOTHEQUE de 
LOGICIELS pour COMMODORE 64. Par 
l'intermédiaire de ce club, Les 
abonnés pourront échanger des pro- 
grammes. Les éventuels intéressés 
devront écrire ou téléphoner au: 


(16x1) 780 10 61 


tir BOURDIN Bruno 
12 rue Pasteur 
92250 La Garenne Colombes 


Je mets n'importe quel programme 
BASIC sur ROMs ou EPROïs, ainsi que 
tout programme binaire. Ceci sur 
matériel CBM et tout autre appareil 
COMIMODORE ou non. 


- Copie de ROfis ou d'EPROïs : 2O00F 


- Modification 
de ROïiis ou d'EPROï : 300F 


Programmation binaire 
de ROïis ou d'EPROS : 3OÛF 


- Mise en ROfs ou EPROhs d'un 
programme BASIC : 300F 


CASTRATARO Pascal 
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Mettez des idées dans votre ordinateur. 


La découverte du Commodore 64 
par DanielJean David - 176 pages 

90,00 FF 
Une introduction générale sur l'informatique, 
suivie d’un apprentissage progressif du langage 
Basic vous amène pas à pas à construire vos 
propres programmes. 
Des notions nouvelles sont introduites graduel- 
lement et, grâces à elles, vous apprendrez vite à 
maîtriser les points forts du Commodore : les 
graphiques, les sons, les couleurs, la haute réso- 
lution et les “ sprites”. 


La pratique du Commodore 64 
par Daniel-Jean David - 176 pages 

90,00 FF 
De la cassette au disque souple, de l'impri: 
mante aux poignées de jeux et crayon lumi- 
neux, ce livre vous donnera tout ce qu'il faut 
connaître pour utiliser au mieux les périphéri- 
ques de votre Commodore 64. Conçu dans l'es- 
prit de “ la découverte du Commodore 64” du 
même auteur cet ouvrage contient de nom- 
breux programmes écrits tant pour les applica- 
tions personnelles que professionnelles. Un 
chapitre est consacré aux notions sur les bases 
de données et au systèmes d'exploitation dis- 
que. La programmation de l'interface RS 232 
est décrite. 


Commodore 64 pour tous 
par Jacques Boisgontier, Sophie Brébion 
et Gérard Foucault - 176 pages 
100,00 FF 


Cet ouvrage initie le lecteur au langage Basic du 
Commodore 64. Les auteurs commencent par 
présenter les notions fondamentales de la pro- 
grammation (variables, tests, boucles...). Sont 
ensuite étudiées les caractéristiques intéres- 
santes du Commodore 64 : les graphiques, les 
sons, les sprites, avec de nombreux exemples 
illustrés. 


Commodore 64 : 

méthodes pratiques 

par Jacques Boisgontier - 176 pages 

100,00 FF 

Cet ouvrage contient 50 exercices et program- 
mes de jeux, d'éducation et de gestion qui per- 
mettent d'en savoir plus sur les possibilités du 
Commodore 64, en particulier sur les graphi- 
ques haute et basse résolution, les sons, les 
sprites, les fichiers séquentiels et relatifs, la 
redéfinition des caractères etc. . 


Les fichiers séquentiels en Basic 
sur Commodore 64 
par Pierre Fraser - 160 pages 

110,00 FF 
Le Commodore 64 est un ordinateur individuel 
qui dispose d'importantes possibilités d'utilisa- 
tion de fichiers. Pierre Fraser, professeur à 
l'université de Québec, travaille sur les ordina- 
teurs Commodore depuis plusieurs années. Il 
nous présente une introduction à la structure 
et à l’utilisatio du Commodore 64 et des fichiers 
séquentiels en Basic. 
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Jeux, trucs et comptes 
pour Commodore 64 
par Michel Benelfoul et Cyril Cambien 


192 pages 

110,00 FF 
Cet ouvrage propose aux novices de la pro- 
grammation 30 programmes en Basic com- 
mentés et décrits à l'aide d’un exemple d'exé- 
cution et d’un organigramme (jeux passifs et 
interactifs, interludes, * trucs”, paie, facturation 
simple et routines etc.). 


102 programmes pour 
Commodore 64 
par Jacques Deconchat - 240 pages 

110,00 FF 
Au fil de ces 102 programmes de jeux ce livre 
guidera le lecteur dans l'exploration du Basic 
du Commodore 64. Les programmes sont clas- 
sés par niveau, chacun d'eux faisant appel à de 
nouvelles connaissances et à une plus grande 
maîtrise du Basic. Les programmes sont décrits 
abondamment commentés et accompagnés 
d'un exemple d'exécution. 


L'assembleur du Commodore 64 
par Daniel-Jean David 

prix : nous consulter 

Les utilisateurs du Commodore 64 trouveront 
dans cet ouvrage l'explication et l'utilisation du 
jeu d'instruction du langage machine de leur 
ordinateur. L'assembleur symbolique, l'éditeur 
et le chargeur y sont décrits. 


Le livre de bord 
du Commodore 64 
par Mathieu Kokinski - 256 pages 

120,00 FF 
Ce livre est une introduction à l'ordinateur indi- 
viduel Commodore 64, à son équipement, à ses 
périphériques, ainsi qu'à son langage Basic. 
Sont aussi abordés : la programmation simple, 
les possibilités graphiques et musicales, l'utili- 
sation des fichiers, les programmes de tri, etc. 
L'ouvrage est complété de programmes variés. 


Le Commodore 64 à l'affiche 

par Jean-François Sehan 

prix : nous consulter 

Une sélection de 30 programmes de jeux utili- 
sant les possibilités graphiques et sonores du 
Commodore 64. Chaque programme est 
accompagné d'un organigramme, d’une liste de 
variables et d’une explication de chaque ligne 
Basic pour une adaptation éventuelle à d'au- 
tres ordinateurs. 


Programme interne du 
Commodore 64 
par Milton B. Bathurst - 252 pages 

130,00 FF 
Ce livre est destiné à ceux qui désirent savoir 
comment leur Commodore 64 accomplit son 
travail, Le lecteur y trouvera la liste complète 
du programme interne de l'ordinateur, détaillé 
et commenté avec en plus une référence croi- 
sée sur l'utilisation des variables et des routi- 
nes. Cet ouvrage sera tout spécialement indis- 
pensable à ceux qui travaillent en langage 
machine. 


La découverte de l’Oric-1 
par Daniel-Jean David - 176 pages 

90,00 FF 
Le but de ce livre est de découvrir l'ordinateur 
individuel Oric-1 et son langage Basic. Cette 
exploration est progressive grâce à l'élabora- 
tion de programmes de difficulté croissante, au 
cours de laquelle les notions nouvelles sont 
introduites. On aborde spécialement les points 
forts de l'Oric-l : graphiques, sons, couleurs, 
horloge. 


Oric-1 pour tous 
par Jacques Boisgontier et Sophie Brébion 
- 176 pages 

100,00 FF 
Consacré à un ordinateur individuel tout nou- 
veau et pourtant déjà très populaire, cet ouv- 
rage d'initiation permet de découvrir les 
grandes qualités graphiques et sonores de l'O- 

















_.  DESIGNATION 


ric-1. Tout d'abord, vous assimilerez les notions 
fondamentales de la programmation 
(variables, tests, boucles), puis vous par- 
viendrez aisément, grâce aux nombreux 
exemples illustrés et aux programmes com- 
mentés, à écrire vos propres programmes. 


52 programmes Oric-1 
pour tous 
par Jacques Boisgontier - 164 pages 

100,00 FF 
Voici un ouvrage dans lequel sont regroupés 
des programmes commentés et illustrés, per- 
mettant d'approfondir ses connaissances en 
Basic. Des exercices et des jeux mais aussi des 
programmes d'éducation et de gestion invitent 
à utiliser l'ordinateur Oric-1 et l'Oric Atmos 
avec beaucoup d'originalité et à en découvrir 
les fonctions particulières. 


L'Oric à l'affiche 
par Jean-François Sehan 

90,00 FF 
Une sélection de 20 programmes de jeux 
d'adresse, de réflexion et de hasard, utilisant les 
possibilités graphiques et sonores de l'Oric. 
Chaque programme est accompagné d'un 
organigramme, d’une liste de variables et d'une 
explication de chaque ligne Basic. 


Boîte à outils pour Oric 
par Michel Martin - 128 pages 

35,00 FF 
Les possesseurs d'Oric-1 ou Atmos trouveront 
dans ce livre de poche de petits programmes 
ludiques ou utilitaires (graphiques, dessins, 
musique etc.) écrits en Basic. 


La découverte du Vic 
par DanielJean David - 176 pages 


Le Vic à l'affiche en 
par Jean-François Sehan - 144 pages 
Clefs pour le Vic 0, 


de Daniel.Jean David - 120 pages 
00FF 


La pratique du Vic 30, 
de Daniel-Jean David - 176 pages 


Le livre du Vic Ponrs 
par Benoît Michel - 248 pages 

110,00 F 

Les systèmes à microprocesseurs 
Daniel-Jean David - 128 pages 

} 90,00 FF 


Ce livre vousinitiera aux conditions techniques 


de la révolution micro-informatique. Les diffé 
rents circuits intégrés : microprocesseur, mé- 
moires, boîtiers d'entrées-sorties sont décrits et 
on montre comment les assembler pour former 
un système. 

Les phases du traitement d'une application et 
du développement d’un système à micropro- 
cesseur sont décrites, notamment du point de 
vue logiciel (programmation en assembleur) 
et des choix à effectuer. 
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